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ChEICE. 1 
Le duo Commodore-Procep va vous y aider . 
La gamme Commodore, harmonieuse et 
complète répond aux besoins les plus divers des 
débutants comme des virtuoses de la micro-informatique 
Procep, distributeur exclusif pour la France de Commodore met ls 
gamme au diapason avec des logiciels de haut niveau en français, un matériel 
nee (clavier AZERTY...) et de nombreux services tels que garantie étendue à un an 
séminaires de formation, documentation complète en français, bulletin des utilisateurs, ete 
Demandez dès maintenant la liste des distributeurs-revendeurs Procep. Près de 

chez vous vous allez trouver une solution = 

à votre portée, en accord avec vos besoins € 

Réf. : 153 du SL (page 36) 





Procep distributeur exclusif pour la France de Commodore. 
19-21, rue Mathurin-Régnier - 75015 Paris - Tél. : 306.82.02 - Télex : 204875F. 
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La loi du 11 mars 1957 n'autorisant, aux termes des alinéas 2 et 3 de l'article 41, d'une part, que « les 
copies ou reproductions strictement réservées à l'usage privé du copiste et non destinées à une utilisation 
collective ». et d'autre part, que les analyses et les courtes citations dans un but d'exemples et 
d illustrations, « toute représentation ou reproduction intégrale, ou partielle, faite sans le consentement 
de l'auteur ou de ses ayants-droit ou ayants-cause est illicite » (alinéa 1“ de l'Art. 40). Cette 


représentation ou reproduction, par quelque procédé que ce soit, constituerait donc une contre-façon & 
sanctionnée par les Art. 425 et suivants du Code Pénal. 
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Des livres pour votre CBM 


«La découverte du Programmer en PASCAL p>- 




















PET/CBM par Daniel-Jean David 
par Daniel-Jean David et Jean-Luc Deschamps 
Cet ouvrage d'initiation à Ce livre contient un grand nombre 
l'utilisation de la gamme PET/CBM : de programmes-exemples et 
comprend, essentiellement, une d'exercices résolus. Les déclarations 
introduction progressive au Pascal concernant les types de 
langage Basic. La découverte du .… données sont traitées avec 
langage est conduite en bâtissant précision et les notions générales 
des programmes de plus en plus sur les structures de données 
élaborés, au fur et à mesure de sont exposées. 
l'introduction de notions nouvelles. Série rouge 
Série verte. 160 Pages - 75 FF 






136 Pages - 65 FF 











La pratique du PET/CBM 
(Volume |) 
par Daniel-Jean David 


Cet ouvrage, qui suppose une 
bonne connaissance du Basic 

et des commandes du PET/CBM, 
ouvre les portes des applications 
faisant appel aux fichiers (cassettes, 
disquettes) à l'impression et au 
bus IEEE. Il comporte également 
de nombreux exemples et 
exercices avec solution. 


Série bleue 
136 Pages -65 FF 













: € Programmer en BASIC 


par Michel Plouin 


Ce livre a été écrit pour les 
utilisateurs d'ordinateurs 
individuels en particulier d'Apple I|, 
TRS-80 et PET/CBM. 

Un répertoire Basic rend son 
utilisation très pratique et facilite 
la transposition d'un programme 
écrit pour un PS.I. sur un autre. 


Série verte 
132 Pages - 65 FF 
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< La pratique du PET/CBM Jeux, trucs et comptes 
:  (Volumell) par Michel Benelfoul 
par Daniel-Jean David Ce livre est destiné à l'amateur 
Ce volume est une initiation à la de programmation débutant, 
programmation en langage désorienté par une mémoire 
machine 6502, dont le jeu vierge de toute instruction. 
d'instruction est expliqué Il y trouvera 29 programmes 







utilisant un maximum 
de fonctions du PET/CBM 
et abordant des domaines 
très variés, des jeux 


et utilisé. L'assembleur 
symbolique, l'éditeur 
et le chargeur y sont 
décrits. L'interaction 






















avec le Basic et à la paie et à la 
avec le système facturation. 
y sont étudiés. Série verte 
Série rouge 160 pacs 
176 pages 

57 EDITIONS DU RS. 
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BULLETIN D' ABONNEMENT 
à envoyer à La Comnode 
25, rue VICG d'AZIR 
75010 PARIS 


Je désire m'abonner à La Commode 
(1 an, à numéros) a partir du numéro 


DOM -------- 


réglement 120 F à l'ordre de SEDERHI 


CCP CB ESPÈCES 


LR ERELRLEKEX 


L à * 
= EDITORIAL = 
* * 


RRLEREREERREREKX 


Dès les premiers mots vous avez remarqué 
l'aspect nouveau de l'impression de La Commode : 
nous avons en effet remplacé la marguerite afin 
d'améliorer la densité d'impression : vous aurez 
des détails dans i'article sur les accessoires et 
matériels compatibles. D'autre part la présenta- 
tion du sommaire comportera une indication des 
systèmes auxquels s'applique chacun des articles, 


sachaiut que la plupart de ces ârticies sont ap- 
plicabies à toute la gamme. 

Dans ce second numéro vous trouverez 
davantage de programmation surtout BASIC, que dans 
le premier, mais précisons bien les choses : La 
Commode n'est pas un recueii de programmes : des 


trucs, des astuces, des adresses et des explica- 
tions de fond s'adressant à des lecteurs curieux 
et fouineurs comme nous, désirant comprendre avant 
LOUL 


même beaucoup 
sous-jacent de 
sans avoir à le 
(disquettes, 


Bien sûr il y aura tout de 
de programmes, avec le problème 
leur entrée dans votre machine 
taper. Les solutions classiques 
cassettes) sont envisageables, les autres solu- 
tions (lectures optiques par exemple) sont inte- 
réssantes si eiles sont réalisables à faible coût: 
écrivez-nous, dites-nous ce que vous en pensez, 
avez-vous d'autres idées 


idees et 
vous sou- 
et une 


En attendant de crouler sous vos 
conseils, toute i'équipe de La Commode 
haite de JOYEUSES FETES de fin d'année 
BÜNNE ANNEE nouvelle. 


Daniel TRECOURT 
















































Pour mieux choisir 
“votre” ordinateur 
et pour mieux l'utiliser. 


= 









TLORDINATEUR 


INDIVIDUEL 


Vous y trouverez : 


L'actualité et les tendances de l'informatique individuelle + des galops et des bancs 

d'essai des principaux matériels + des panoramas et des tests comparatifs e le point 

des grandes manifestations internationales + des articles d'initiation + des synthèses 

+ des programmes + des interviews “exemplaires” + des conseils + des idées 
e des astuces. 


{ L'ORDINATEUR 
INDIVIDUEL 


chez votre marchand de journaux 










41 rue de la Grange aux Belles - 75010 Paris 
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L COURRIER DES LECTEURS s 
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LRELRLLÉELRRELLRÉLRELLLLLLLEES 


M. Yves THIBAUT (Amiens) 


IL y a un an ef demi , je me su£s Lancé 
avec un 3008 qui est devenu maintenant un syste- 
me 3008, 16, 32 commutable avec un f£oppy 3040 
et imprimante 3022. 


Grace à ma formation d'éngènteur élec- 
#ronicien, à mon métier qui £ouche aux mécropno- 
Cesseurs, à Vos bouquins, Mn VAVID, qui sont 
remarquables, j'ai pris Le vêtus inforuratique 
qui est particutièrement tenace. 


Sous La pression de cottègues et pro- 
prictaires de matériel Commodore qui manquent de 
<Luyaux et pataugent avec Leurs notices, j'ai de- 
cidé de Lancer un C£ub “"CBM 80". 


Vou£ez-vous m'aider en pub£iant L'en- 
cart ci-joint afin de regrouper Les utilisateurs 
Commodore? Nul doute qu'ils ne deviennent des 
membres actifs de "La Commode". 


Quand on compare ce qui 5e fait en La 
matiône en Angleterre, fonce est de constater 
notre retard. 


Aussi La Picardie n'étant pas 44 eloi- 
gnée de Londres, pourquoi ne pas instaurer de 
Liens avec nos collèques d'Outre-“anche? 


Merci d'avance pour votre aide. 


Nous vous remercions de votre amabilité 
et bien sûr nous publions l'annonce de votre 
club. D'ailleurs La Commode à pour politique de 
favoriser les Clubs. 


Nous vous remercions aussi des compli- 
ments sur D.J. DAVID. il est clair que c'est un 
atout pour La Commode de le compter dans l'Equipe 
qui est formée, on peut le dire, des gens qui en 
France connaissent le mieux le matériel 
Commodore. 


Bravo pour le dessin de la Cathédrale 
d'Amiens. Envoyez-nous le programme! 


M. P.A. SAULOU Soisy/Seine 


Le premier numéro de La Commode est 
pau . 


Nous devions être nombreux à attendre 
avec impatience ce nouveau meuble pour Lequet 
nous av4ons préparé une place de choix dans 
notre coin-ordinateur. 


Je voudrais vous féliciter pour votre 
courageuse entreprise, mais fe Lalsserai aux 
autres Lecteurs Les Louanges méritées que vous 
ne manquerez pas de recevoir. 


Le premter article fait état de cen- 
Laines rumeurs concernant des éncompatibitités, 
des diféérences etc... Je viens d'acquérir une 
imprimante 4022 et si je ne me trompe pas, j'y 
remarque que£ques "anomalies" : 


- 4ntertiqnes : Le manuel éndique CiiR$(Z4) 


comme valeur par défaut; cela semble inexact car 
cette valeur fonce un interLiqne nettement plus 
faible; essayez par exemple : 


10 OPEN 4,4 : OPEN 6,4,6 : PRINT#Æ6,CHR$ (24) 

20 FOR I=1 TO 5 : PRINT#4,"ESSAT IMPRIMANTE C8M 
4022" : NEXT 1 

30 CLOSE 6 : CLOSE 4 


En remp£éaçant CHR$(24] par CHR$ (32) on 40 
hkapproche de L'écartement standard (6 Lignes par 
pouce). 


À partir de CHR$(1Z8) L'éntertigne n'est 
plus généré; L'imprimante neste sur La même 
Ligne! 


- Litténaux : nonmalement un Littéral placé 
en début de format à L'adresse secondaire numéro 
L devrait étre automatiquement répète en fin de 
Liane; ce n'est pas Le cas; essayez par exemple 


10 OPEN 1,4,1 : OPEN 2,4,2 

20 PRINT# 2," (revers e } FAAAAAAAAAAAAAAAAAAAAAAAAA 
30 FOR I1=1 TO 5 : PRINT##1,"ESSAT IMPRIMANTE CBM 
4022" : NEXT I 

4) CLOSE 4 : CLOSE 1 


Vans Les programmes de gestion, ces petites 
différences sont {nés génantes, surtout si L'on 
emp£oi du papier imprimé (feuilles de salaires) 
ou des tableaux à cadnages prècis (états, comp- 
{Labitité) . 


Mon revendeur n'a fait aucune difficut- 
Lé et m'a proposé un échange contre un modèle 
3022 et en cela &£ respecte 464 engagements, 
mals fe negrette qu'il n'y ait pas d'autres 
solutions can Le modèle 4022 possède des atouts 
indiscutables : silence, retour en début de 
ligne Ammediatement après Le dennien caractere 
frappe (L'ancienne parcourt conscéencieusement 
toute £a Ligne même 54 elle est vide!), panier 
pour recuetttin Le papier, caractères plus élé- 
ganxs avec jambes etc ... 


Votre Journal doit établir un Eien sans 
complaisance avec L'impontateur pour obtenir Les 
modifications où améliorations souhaitées par 
Les utitisateurs et cela senatt, je Cros LS 
Dos . 


Un pourrait envisager une sorte de C£ub 
des Utilisateurs PET/CÉM avec des rencontres, 
échanges d'idées et de programme, etc 


IE senait particulièrement intéressant 
de dresser une Liste des grands programmes dés- 
pontbles, Les adnesses de leurs auteurs ou ne- 
vendeurs 04 d'en necueii£ir L'avis de ceux qui 
Les utilisent; en effet nous he Aomies pas tous 
des programieurs confüunes (souvent faute de 
Lemps) et Les portes de La mcero-infonmatique ne 
doivent pas nous Etre fermées pour autant. 


Connaissez-vous une version française 
du progranne de traitement de textes WP3 (an- 
Géais); Àt est plus complet que cetue dont je 
dispose |[Procen) 4 que f'ax d'ailleurs utilisé 
pour Vous écrire cette tottre. 


Z LE mn 22° 2 











TT TT 


Or pente 2 


Enfin, pouvez-vous m'éndiquer La mèétho- 
de pour connecter une machéne à écrire étectri- 
que, Les imprémantes à marguertites étant encore 
{res onénreuses. 


Merci de votre initiative et ajoutez 
beaucoup de tiroirs à votre Commode. 


Voilà une lettre qui nous encourage 
beaucoup. 


D'abord les réponses à vos questions 
techniques : 


-— pour la 4022, vos constatations sont 
exactes. Voyez l'article dans le cahier spécial 
compatibilité. 


- nous ne connaissons pas vraiment de 
version française de WORDPRO 3. BC (24 route de 
La Sapinière 4060 Banneux Belgique) a fait des 
ROM AZERTY et une modification de WORDPRO pour 
CBM 3000. Renseignez-vous auprès d'eux. 


- Il n'y à pas moyen de connecter de 
machine à écrire électrique bas de gamme à un 
ordinateur. En effet, dans ces machines, l'élec- 
tricité ne sert que d'amplificateur de frappe. 


Pour ce qui est de votre demande que La 
Commode établisse un lien entre clients, distri- 
buteurs et importateurs, nous sommes tout-à-fait 
d'accord, et c'est même une des vocations pri- 
maires de La Commode. Que tous ceux qui ont 
quelque chose à dire dans ce domaine écrivent. 
Tout sera publié, et ce, sans complaisance, 
puisque nous sommes indépendants. 


En ce qui concerne les clubs, nous ne 
pensons pas que ce soit le rôle de La Commode 
de créer un club. En effet, les clubs, à notre 
avis, doivent plutôt étre organisés à l'échelle 
régionale, rien que pour permettre aux membres 
d'assister aux réunions. En revanche, La Commode 
est tout-à-fait prête à vous aider, d'abord en 
informant les lecteurs de la création des clubs 
et en véhiculant toutes les informations que 
vous nous enverrez : suivez l'exemple de M. 
THIBAUT. 


Maintenant, d'autres formes d'aide sont 
envisageables : écrivez-nous et nous essaierons 
de vous satisfaire. On pourrait envisager une 
sorte de fédération des clubs régionaux, avec 
une réunion annuelle à l'occasion, par exemple, 
d'un PET SHOK français que nous ne désespérons 
pas de voir apparaître. 


M. Yvon L'HERMITTE 


Suite a notre conversation sur votre 
s4and au SICOB Boutique, vous trouverez ci-joint 
une photocopie de L'artic£e sur HARDCOPY, en 
Langage machine, sur CSM 3000. 


Ce programme ne fonctionne pas sur 4000 
et ce que pose quetques prob£emes d'adaptations. 
Pouvez-vous me dépanner ? 


Vous trouverez la réponse dans notre 
article “Comment adapter un programme ..." dans 
le cahier spécial compatibilité. 


KKKKKARKRKKAAKRAKRAKRARAKKRKRKKRÉRKKKAKARKKRARARKAKRAARAKAAAARRRAAKRAAKAKRAXX 


* 


A Commodore Ciub Marseillais cherche Sponsors pour interfaces 
* diverses, et Micro Commodore ainsi que livres, programmes etc ... 
* et prêt gracieux d'une salle pour réunions et installer le maté- 


* riel. 


* 


Adresse provisoire 


C.C.M. chez Mr LAURENT J. Paul 
La FAUVIERE Bât A1 
Chemin de St Loup à St TRONC 
13010 MARSEILLE 


LE DE ve A UE at RC RE, AE 1 


KAKAKKKAAKAAAKXKKKARÉRRRAKRARRRKRARKRERERAERREREARÉARÉARRAXARARELARKÉ RÉ ÉÉ EX 


14 IHPUT'ETES-WOUS PICARD':R# 

24 IFLEFT#GRS, 13="H'THENT"DOMMAGE. C'EST UHE FELLE FEGIOH" 

36 IHPUT"ETES-YOUS INTERESSE PAR UNE ACTIVITE DE COMMODORISTE":R# 
A IF LEFT#ÉRS. 13="0"THENÉE 


24 DOMMAGE FOUR VOUS ! 


E& PRINT"ALORS CONTACTEZ LE CLUB CEM 54 


S4 PRINT'TEL, (22346, 46.26 





VS PRINT". THIFAUT S RUE JACQUES CARTIER  £AGG@ AMIENS" 


FROGRAMME ACTIVITES 


- CONHAISSANCE LE LA FAMILLE COMMODORE 
- ECHANGES TECHNIQUES 

- ECHANGES LOGICIELS 

«- EIELIOTHEQUE REYUES 

- PROJETS TECHHIQUE INTERFACES 

-COURS EASIC ET HSSEMELEUR 


PICARDS À OS CLAVIERS 1! 


KE Ce 22° 2 
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= NISITE AU SICOB 81 x 
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L 3 
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Le SICOB 81 a été spécialement important 
pour nous puisque, comme vous le savez, il a 
marqué la date de naissance de La Commode. De 
nombreux lecteurs sont venus nous encourager à 
notre stand et des échanges de vue intéressants 
ont eu lieu, permettant à nos lecteurs de nous 
indiquer ce qu'ils souhaitaient trouver dans la 
revue. Nous nous efforcerons de les satisfaire. 
À ce propos, nous souhaitons que tous ceux qui 
n'ont pu venir nous voir au SICOB nous écrivent 
pour nous dire quels sont leurs opinions et 
leurs désirs. 


Une des questions la plus souvent posée 
est celle de nos relations avec PROCEP et avec 
le bulletin PROCEP. Nous rappelons que nous som- 
mes tout-à-fait indépendants de PROCEP, ce qui 
nous permet, le cas échéant d'être critiques et 
vigilants. Cette indépendance nous permet d'étu- 
dier dans nos colonnes la connexion de matériels 
compatibles non Commodore, comme le lecteur 
Chatsworth dans ce numéro. Il sera suivi par 
l'imprimante Seikosha, l'Exatron Stringy floppy 
etc... 


Une autre question est celle des posses- 
seurs de P.E.T. 2001 qui se sentent un peu aban- 
donnés maintenant qu'il y a les nouveaux modè- 
les. Nous rappelons que La Commode est consacrée 
à TOUS les modèles Commodore, donc le 2001 ne 
sera pas oublié. Le meilleur moyen pour cela est 
d'ailleurs -répétons-le encore- que, vous lec- 
teurs, nous envoyez vos programmes, vos trucs, 
vos découvertes. 


Naturellement, nous avons profité de no- 
tre présence au SICOB pour le visiter, et, spé- 
cialement les trois stands PROCEP. PROCEP était 
en effet présent à la Boutique SICOB, au salon 
OEM et -nouveauté 81- au "Grand SICUB". Les CBM 
étaient présents aux stands de nombreux distri- 
buteurs. 


Les principales nouveautés présentées 
par PROCEP étaient dans le domaine du logiciel : 


TRIEX, le logiciel de tri 


MULTEX, un système permettant de partager un 
disque entre plusieurs unités centrales 


PLOTTEX, un jeu de commandes spéciales pour 
piloter un traceur de courbes 


MASTER, un ensemble logiciel facilitant l'é- 
criture de programmes, contenant en particulier 





un système de gestion d'écran, un séquentiel in- 
dexé et un système de protection des programmes. 


Du coté logiciels d'applications, on remar- 
quait un système de gestion du CBM en terminal 
intelligent et un système de gestion de cabinet 
médical (LOCAME) qui nous ont semblé très effi- 
caces. . 


Ces logiciels seront bien sûr essayés en leur 
temps dans La Commode. 


Dans le domaine du matériel, on trouvait 
la carte permettant de porter la mémoire d'un 
8032 à 96 K (le 8096) et, surtout, l'unité de 
disques durs 2 fois 10 M octets, dont 10 M fixes 
et 10 M amovibles, avec un temps d'accès très 
rapide. Petite déception : le VIC était présent 
avec ses belles couleurs, mais on apprenait 
qu'il ne serait livrable que début 82. Nos pre- 
miers contacts avec cette machine nous ont 
montré que votre impatience est justifiée!. 
Autre déception, le MICROMAINFRAME n'était pas 
encore arrivé en France au SICOB; là encore, 
nous l'attendons avec grande impatience. 


Pierre-Etienne THALBERG 
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LR 


transistor. 
Voici le schéma rectifié : 


HP 


sh 


LA CR 2° 2 


Dans le schéma de branchement d'un 
haut parleur (numéro 1 p. 54), on n'a 
pas suffisamment marqué l'émetteur du 
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Interview Distributeur 
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ÿ. M, AUTRAND vous êtes gérant de Europrocessäng, distributeur 
de matériet Commodore dans La négion parisienne, pourtant 
vous ne fiqurez pas sur La Liste PROCEP. Pourquoi ? 


R. Nous sommes encore en période probatoire. En quelque 
sorte nous sommes candidat à être distributeur, en attente d'avoir 
atteint un chiffre suffisant. 


0. Comment êtes-vous venu à La iécrotnfonmatique ? 


R. Notre spécialité était la protection, l'alarme électro- 
nique et le téléphone temporel. De ce fait nous étions familiarisés 
avec l'utilisation de circuits électroniques sophistiqués et nous 
voyions même déjà apparaître dans ce domaine, l'utilisation des mi- 
croprocesseurs. 


L'industrie de la microinformatique nous paraissant en 
développement exponentiel et la concurrence dans le milieu de l'a- 
larme menaçant nos marchés habituels, il nous a semblé intéressant 
de tenter une diversification de nos activités et, entre autres, 
d'étudier si dans les milieux industriels que nous connaissions bien 
il y avait une possibilité d'ouverture à de nouveaux produits. 


Q. Queties ont êté vos premières constatations sur ce marché ? 


R. Notre première expérience nous a montré qu'il existe sur 
le marché de la microinformatique deux genres de clientèles bien 
différentes. D'une part ceux qui désirent pratiquement une informa- 
tique clés en mains, avec solution par le distributeur de tous leurs 
problèmes matériels et logiciels. D'autre part des utilisateurs qui 
disposent déjà chez eux de structures suffisantes pour se contenter 
d'acheter le matériel et éventuellement quelques logiciels standard. 
Il est clair que cette dernière clientèle est infiniment plus facile 
à traiter et à satisfaire. Par contre, la première clientéle, sou- 
vent incompétente en informatique, ne se rend pas compte de la va- 
leur relative du matériel et du logiciel et a tendance à fortement 

sous-estimer les coûts du logiciel. Leur plus grande difficulté est 
| d'ailleurs d'établir un cahier des charges précis: au cours de la 
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réalisation du projet, ils ajoutent de nouveaux impératifs qui, bien 
sûr, amènent des retards et des contestations. Il nous semble donc 
très difficile pour un petit distributeur de traiter une telle 
clientèle, qui convient probablement beaucoup mieux à une SSCI. Il 
nous semble donc très important de distinguer entre la fourniture de 
matériel et celle de logiciel à façon. Seule la fourniture de logi- 
ciel standard peut être assurée par les entreprises de notre taille. 


= Vous avez choisi de distribuer du matériel Commodore. Avez- 
vous des raisons particulières pour justifier ce choix ? 
Et, d'aitloeurs, distribuez vous d'autres matériels ? 


R. Nous distribuons exclusivement du matériel Commodore. 
Une premiere raison est que l'un d'entre nous avait dès le début une 
très bonne connaissance de ce matériel. Une seconde raison est la 
fiabilité de ce matériel qui ne nous a jusqu'à présent pas posé de 
problèmes d'après-vente. Par contre, ie support apporté par l'impor- 
tateur est, vis-à-vis des candidats distributeurs, assez sommaire; 
nous pensons que, une fois agréés, le soutien doit devenir plus im- 
portant ce qui permettrait un développement intéressant. 


0e S£ vous vouliez, pour conclure, caractériser votre approche 
de La distribution de materniet Commodore, et signaler vos 
potn£s fonts, que dirniez-vous ? 


R. Notre point fort est la parfaite connaissance de 1l'im- 
plantation de matériel électronique délicat dans n'importe quel 
environnement, y compris les milieux difficiles. Nous avons d'autre 
part une bonne connaissance des milieux universitaires et de l'en- 
seignement en général. Nous pensons qu'il y a certainement un grand 
développement possible dans ce domaine. Nous sommes aussi très 
intéressés par ie milieu de l'informatique médicale et biologique, 
pour lequel nous avons développé et développons des logiciels. 


Propos recueillis par Jean DELAVILLE 


Carte d'identité du distributeur 


nom EUROPROCESSING 

adresse 7, rue des Deux Communes 
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gérant M. AUTRAND 

ingénieur commercial Mle LEGAL 
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Le coin des Débutants 
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L'instruction PRINT est certainement la 
plus importante du BASIC: c'est elle qui permet 
à l'utilisateur de prendre connaissance des ré- 
sultats obtenus par l'ordinateur. Si une telle 
instruction n'existait pas, il ne se vendrait pas 
beaucoup d'ordinateurs. 


Sous ses formes les plus simples elle est 
très facile à utiliser: PRINT À fait imprimer la 
valeur de la variable A, PRINT A$ fait imprimer 
la valeur de la chaîne de caractères A$. 


D'ailleurs - et c'est un avantage majeur du 
BASIC - l'élément à imprimer peut être : 


n'importe quelle expression arithmétique: 
PRINT 2*A+SIN(X) 


ou chaîne de caractères PRINT A$+B$ 


ou une constante numérique PRINT 1 impri- 
mera Î 


ou alphanumérique PRINT "BONJOUR" 


_ Les constantes ne sont que des cas parti- 
culiers des expressions. 


Impression de plusieurs données par le mème 


ordre PRINT 


On peut demander l'impression de plusieurs 
éléments dans le même ordre PRINT. Les éléments 
doivent être séparés par des virgules ou des 
points virgules: 


PRINT A,2*A+1;B$,"TOTO" 


Tous les éléments d'un même ordre PRINT 
seront en principe imprimés sur la même ligne. 
On passe à la ligne si l'on arrive en fin de 
ligne: un nombre peut ainsi être coupé. 


La séparation produite entre deux élé- 
ments dépend du séparateur virgule ou point- 
virgule utilisé. Le principe est le suivant: 


Si le séparateur est un point-virgule,il 
n'y a pas de séparation: le deuxième élément 
s'imprime là où on était prêt à imprimer après 
le premier élément. 


Si le séparateur est une virgule, il y a 
séparation: 


- sur écran, on commencera à impri- 
mer à la prochaine colonne de numéro multiple de 
10 laissée libre par le premier élément; si le 
premier élément s'est terminé en colonne 8 on 
ira à la colonne 10, s'il s'est terminé en co- 
lonne 11 on sautera à la colonne 20. 


LES MULTIPLES FACETTES 
DE L'INSTRUCTION PRINT 
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- sur imprimante (lorsque l'instruc- 
tion PRINT est associée à un CMD), on saute sys- 
tématiquement 10 colonnes. 


Cela c'est le principe. L'application 
peut faire apparaître des paradoxes. 


PRINT "BONJOUR" ; "MONSIEUR" 
produit BONJOURMONSIEUR 


mais 


PRINOMS2RMprodUit 12 (le 1 est 
en colonne 2, et il y a deux espaces entre le 1 
et le 2). 


Pourtant, les impressions sont bien join- 
tives. C'est que l'impression d'un nombre est 
précédée du signe donc il y a un espace en tête 
pour les nombres positifs, et elle est suivie 
d'un curseur à droite. Le 1 est donc en colonne 
2 puisqu'il est précédé de son signe. Les deux 
espaces entre le 1 et le 2 sont dûs, le premier 
au curseur droit de fin de 1 et, le second au 
signe du 2. 

Inversement, on peut avoir des impres- 
sions jointives avec la virgule: si la première 
impression se termine en colonne 9, la suivante 
commencera en 10. 


Virgule et point virgule en fin de ligne 


Il est paradoxal qu'on puisse terminer un 
ordre PRINT par , ou ; puisqu'il n'y a rien à 
séparer. Mais cela produit un effet très impor- 
tant. 


Normalement tout ordre PRINT se termine 
par un retour chariot, c'est-à-dire qu'on va à 
la ligne pour etre prêt à imprimer à la ligne 
suivante pour l'ordre PRINT suivant. C'est pour 
cette raison que PRINT tout court fait aller à 
la ligne. 


Eh bien, ce retour chariot est supprimé 
si vous terminez par , Ou ; 


PRINT A$; est équivalent à PRINT A$;B$ donc 
PRINT B$ les impressions seront collées sur 
la même ligne. 


PRINT Af$, est équivalent à PRINT A$,B$ donc 
PRINT BS$ les impressions seront sur la même 
ligne mais séparées. 


Cette possibilité de faire plusieurs im- 
pressions sur la même ligne permet de tracer des 
courbes. 


Si, à la ligne d'impression où on en est, 
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la valeur de la fonction est proportionnelle à 
N, il faut imprimer N blancs puis une *. Les N 
blancs sont produits par la boucle: 


50 FOR I=1 TO N 

60 PRINT " "; (1 espace; on reste sur la meme 
70 NEXT I ligne) 

80 PRINT "*" (imprime l'* et va à la ligne) 


Ceci est inclus dans une boucle: 


30 FOR X=A TO B STEP (B-A)/20 
40 N=...en fonction de F(X) 


.. 


90 NEXT X 
Impression de titres 


L'inconvénient de l'instruction PRINT A 
est qu'elle ne fait imprimer que la valeur de A. 
On obtient donc un nombre sans que rien ne dise 
de quoi il s'agit. La solution est de faire im- 
primer un titre tel que: 


PRINT "A=";A 
ou PRINT "RESULTAT="; A 


Suppression des décimales 


À propos, un ennui qu'on a souvent lors- 
qu'on imprime des nombres, c'est qu'on a souvent 
trop de décimales. Voici comment garder 2 déci- 
males: 


10 DEF FNF(X)=INT(X*100)/100 


et au lieu d'écrire PRINT X on écrit PRINT 
FNF(X). 


Comment cela marche? 


Supposons que X-123.45678 
alors X*100-12345.678 
et INT(X*100)-12345 
INT(X*100)/100-123.45 


On a bien gardé 2 décimales. Il y a tron- 
cation et non arrondi.Si l'on veut garder D 
décimales, il faut remplacer 100 par 10tD. 


Graphiques 


On a vu comment imprimer n'importe quel 
texte. On peut de la même façon imprimer des 
caractères graphiques et ainsi produire des 
dessins sur l'écran. 


Voici une manière pratique de procéder: 


1) faites le dessin un peu excentré vers la 
droite de l'écran, en allant à la ligne par tou- 
ches “mouvement de curseur" et non par RETURN. 


2) Une fois le dessin fait, vous transformez 
chaque ligne en instruction PRINT en tapant : 
nn ? “ RETURN (nn est un numéro d'instruction 
variant à chaque fois; il faut se débrouiller 
pour que les numéros aient le même nombre de 
chiffres sinon le dessin sera tordu; On rappelle 


que ? est l'abréviation de PRINT). 


Une autre manière est d'incorporer les 
caractères graphiques dans une variable chaîne 
de caractères: 


APE Res ce " puis PRINT A$ 


On voit combien les effets peuvent être 
variés avec une seule et meme instruction. Ce 
qui précéde est valable pour le PET, tous les 
modèles de CBMet aussi le VIC, à la largeur 
d'écran près. Mais voici encore mieux. 


Mouvements de curseur 


Si dans la chaîne à imprimer, vous incor- 
porez des caractères de controle d'affichage 
comme les mouvements de curseur, le passage en 
contraste inversé,le vidage de l'écran, le re- 
tour en haut à gauche de l'écran, etc... ces 
caractères ne sont pas obéis tout de suite. Ils 
sont remplacés dans la chaîne par un symbole en 
contraste inversé et ce n'est que lorsque la 
chaine sera imprimée que le caractère deviendra 
effectif. Sur le VIC, ceci est valable aussi 
pour les contrôles de changement de couleur. 


Ceci permet de la mise en page et 
facilite encore les dessins. Par exemple pour 
être prêt à imprimer en ligne 10, colonne 8, il 
suffit de faire: 


PRINT "Clrbbbbbbbbbddddddd" ; 


Le CIr vide l'écran et met en position 1,1. 
Les 9 curseurs bas amènent à la ligne 10 et les 
7 curseurs droits amènent en colonne 8. Il faut 
terminer par ; sinon on irait en 11,1. Il est 
plus astucieux encore de définir deux variables 
B$=" 24 curseurs bas ", D$=" 21, 39 ou 79 cur- 
seurs droits “ et pour aller en L,K il suffit de 
faire: 


PRINT "Clr" + LEFTS(B$,L-1) +LEFT$(D$,K-1); 


On peut aussi se constituer une biblio- 
thèque de dessins dans des variables chaines de 
caractères. Par exemple: 


T$=" lbg/baag/bagg E\b\lbg \ " 


Ceci met dans T$ le dessin d'un transis- 
tor NPN. Combiné avec l'instruction ci-dessus, 
on peut placer le dessin où on veut. 


Dessins animés 


Les touches “mouvements de curseur" per- 
mettent d'animer vos dessins. Par exemple, pour 
faire déplacer une balle vers la droite, il suf- 
fit de : PRINT "e"; (impression de la balle) 
puis dans une boucle: 


PRINT "gSpe"; g revient sur la balle, Sp 
l'efface, puis on la réimprime un cran plus à 
droite. 


Pour faire propager la balle à gauche, on 
fait : PRINT "gSpgge"; 


Daniel-Jean DAVID 
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À quelques variantes près le calcul des 
primes de remboursement d'un prêt est à peu près le 
même. Les différences interviennent d'une part sur 
la nature des versements eux-mêmes : fréquence (men- 
suelle, semestrielle...), taux fixes ou progres- 
sifs, montants des versements périodiques fixes ou 
évoluant dans le temps. D'autre part les différen- 
ces peuvent intervenir sur des points beaucoup plus 
“discutables": approximations dans les calculs 
(acceptables lorsque les taux sont faibles mais de- 
venues inacceptables pour les taux pratiqués cou- 
ramment à l'heure actuelle), calculs des intérêts à 
terme échu ou non, en tenant compte des divers rem- 
boursements déjà effectués depuis le dernier calcul 
d'intérêts où non... autant de détails qui, “bien 
emballés" peuvent passer inaperçus mais qui feront 
par exemple passer un taux annuel de 18% à 20%. 


Malheureusement, un calcul propre nécessi- 
te une certaine formalisation: afin de réduire 
cette phase -pénible pour beaucoup- nous ‘poserons 
clairement les hypothèses et ensuite nous indique- 
rons les principales étapes du calcul. 


Soit S la somme empruntée à l'instant t-0. 

Les remboursements se feront aux instants tm = 
m x T, jusqu'au dernier tM = M x T, la durée étant 
imposée. 


Les remboursements fixes aux instants tm seront 
notés R. 


La somme due, réévaluée à l'instant tm sera 
notée S'm avant remboursement, Sn après rembour- 
sement de R. 

Soit tx le taux du prêt sur la durée T. 


Ainsi on peut poser les équations de 


départ : 
SOIES 
SM = 0 
SEM STE IER Ex) m compris 
entre 1 
Sm = S'm-R et M 


Cela nous donne Sm = Sm-1x(1 + tx) - R : M 
équations 


Ceci se résout -sans aucune approxima- 
tion, bien sûür- en donnant : 


SHC EX) ISO RE He on 
tx 


Or SM = 0 , SO = S donc : 


R=Sx (1) 


CRIE 
UE DOM 


* 
CALCUL DES PRIMES : 

+ 

DE REMBOURSEMENT D'UN PRET E 
* 

Li 
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Il faut ici préciser nettement que le cal- 
cul précédent est fait pour un tx correspondant à 
la périodicité des remboursements, c'est-à-dire un 
taux annuel si les remboursements sont annuels , un 
taux semestriel si les remboursements sont semes- 
triels. 


Prenons le cas -le plus courant- d'un taux 
annuel pour un remboursement mensuel: la formule 
ci-dessus n'est valable que pour un taux mensuel. 


Une somme de 1 franc prétée au taux mensuel tm 
devra être remboursée 1 +tm au bout du premier 


mois, (1 + tm) au bout du deuxième mois et (1 + tm)! 


au bout du douzième mois. 


De même, ce franc prété au taux annuel ta devra 
être remboursé 1 + ta au bout de un an. 


Le taux mensuel tm correspond au taux annuel ta 
(mensualisation du taux ta) si, les deux calculs 
donnent la même somme à rembourser au bout d'un an 
donc si (1 + tm)?= 1 + ta 


Maintenant nous pouvons considérer le pro- 
blème de façon plus habituelle: une somme S emprun- 
tée au taux annuel ta est remboursée mensuellement 
pendant N années, soit 12N mensualités égales. Il 
suffit de remplacer tx par tm et M par 12N dans la 
formule précédente (1), puis de "simplifier" pour 
que ne figure que le taux annuel ta dans la nouvel- 
le formule qui est : 


R=Sx(1+ ta)? 1 remboursement mensuel 
1- (f +ta) N d'un prêt sur N années 


au taux annuel ta. (2) 


Bien sûr tout remboursement de prêt ne 
contient pas que cette somme indiquée. Cette somme 
est l'essentiel, il faut y ajouter des frais de 
gestion et d'assurance. 


Le programme BASIC qui suit ‘“demande" un 
taux annuel et une durée en année pour calculer 
chaque mensualité par somme de 10000 francs emprun- 
tée. 


10 INPUT "TAUX"; TAUX 

20 IF TAUX = O THEN END 

30 INPUT "SOMME EMPRUNTEE"; S 

40 INPUT "DUREE EN ANNEES"; DUREE 

50 IND = 1 + TAUX / 100 

60 X = S * (INDT(1/12)-1) 

70 PRIME = X / (1 - INDT(- DUREE)) 

80 PRINT "REMBOURSEMENT MENSUEL"; PRIME 
90 GOTO 10 


Souvent avant de faire un très gros achat 
(logement) on se pose la question “compte tenu de 
mes revenus, à tel taux et sur tant d'années, 
combien puis-je emprunter au maximum ? ". Générale- 
ment -vues les lois limitant les retenues sur sa- 
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laire- les établissements bancaires limitent les 
remboursements à 30 ou 33 %des revenus mensuels 
des emprunteurs). Une telle recherche peut se faire 
par tâtonnement à l'aide du programme précédent. On 
peut aussi faire un autre programme donnant ce ré- 
sultat. 


À partir de (2), soit P le revenu mensuel 
et kP le remboursement mensuel autorisable maximum. 


S max = KP x 1 = (1 + ae 


(1 + ta)<-1 


Pour une durée infinie, on obtient la som- 
me maximale, empruntée vers laquelle on tend en 
augmentant la durée: 


SRE KP 
(1 + ta)®-1 


05 K = 1/3 : REM K PEUT ETRE MODIFIE 
10 INPUT "TAUX"; TAUX 

20 IF TAUX = O THEN END 

30 INPUT "DUREE EN ANNEES"; DUREE 

40 IND = 1 + TAUX / 100 


50 INPUT "VOS REVENUS"; P 

60 SF = K*P / (INDt(1/12) -1) 

70 S = SF * (1 - INDT(-DUREE)) 

80 PRINT " VOUS POUVEZ EMPRUNTER “"; S;" AU 
MAX IMUM" 

90 PRINT “ EN AUGMENTANT LA DUREE VOUS POURRIEZ 
VOUS RAPPROCHER DE :"; SF 

100 GOTO 10 


Les deux programmes précédents peuvent 
être améliorés dans la présentation des résultats. 
La seule amélioration que je donnerai est la tron- 
cature aux centimes (105 le lecteur pourra généra- 
liser). La seule fonction de troncature est la 
fonction INT : il faut donc se ramener à l'utilisa- 
tion de la partie entière d'un nombre soit : 


75 S = 100 * INT (S/100) 


Cette formule simple ne permet pas d'af- 
firmer que les deux décimales ainsi que le point 
décimal ou le chiffre 0 à gauche du point décimal, 
sont édités : nous laisserons cette friandise au 
lecteur. 


Daniel TRECOURT 
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Pour ceux qui n'ont pas EUEX 
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Le programme ci-dessous rendra des ser- 
vices à tous ceux qui sont privés d'EDEX : pos- 
sesseurs de P.E.T. 2001 anciens où l'on ne peut 
installer de MEM supplémentaires, possesseurs du 
CBM 4000 qui n'ont pas encore leur version d'E- 
DEX, possesseurs de VIC. Il offre en effet cer- 
taines des possibilités d'EDEX : numérotation 
automatique, gestion de bibliothèques de sous- 
programmes, suppression en bloc d'une série 
d'instructions. Il est formé d'instructions qui 
occupent le début de la zone programme : vous ne 
pourrez définir vos propres instructions que mu- 
nies d'un numéro supérieur à 50. 


Mode d'emploi 


Le programme se lance par RUN. Aussitôt 
vient un menu qui vous propose 7 possibilités : 


E pour entrée d'instructions (Entry -nous nous 
excusons mais le programme est en anglais-. Rien 
ne vous empêche, en le tapant, de mettre les 
textes en français). 


S pour rangement sur périphérique (Store) 
R pour lecture depuis un périphérique (Read) 
X pour sortir du programme LIBRARIAN (eXit) 
D pour suppression (Delete) 
G pour exécution du programme utilisateur (Go) 
L pour listing. 
Commande E (entrée) 


Le programme vous demande l'origine et 
l'incrément des numéros d'instructions que vous 
voulez créer. Si vous donnez un départ inférieur 
à 50, il le force à valoir 50. Si l'incrément 
est extérieur à l'intervalle 1-255, le programme 
impose 10. 


Ensuite vous tapez les instructions une à 
une, Sans numéro, et terminées par RETURN. Lors- 
que vous voulez cesser d'entrer des instruc- 
tions, ou changer de zone de numérotation vous 
tapez un RETURN tout court. Le menu réapparait. 


Commande S (sauvegarde) 


Le programme vous demande l'unité (vous ré- 
pondez 8 pour disque, 1 ou 2 pour magnéto), la 
platine (vous répondez O0 ou 1, la réponse doit 
étre présente pour magnéto), le nom du fichier 
et la gamme d'instructions à sauver. Vous répon- 
dez à cette dernière question par, par ex. : 
00050-00100 (les zéros à gauche sont obligatoi- 
res) et on sauve la portion du programme compri- 
se entre 50 et 100. 


Commande R (lecture) 


Le programme demande l'unité, la platine 
et le nom de fichier (réponses comme pour S). 
Les instructions lues vont s'insérer parmi les 
instructions déjà existantes du programme utili- 
sateur, d'où la possibilité de gérer une biblio- 
thèque de sous-programmes. En cas d'instructions 
de même numéro, c'est la dernière lue qui rem- 


place son homologue. 
Commande X (sortie) 


Cette commande vous permet de sortir de 
LIBRARIAN pour, par exemple, changer des numé- 
ros. 


Commande G (exécution) 


Cette commande fait exécuter le programme 
utilisateur. À la fin, on est sorti de Libra- 
rian; On peut toujours y rentrer par RUN. Main- 
tenant, l'instruction finale de votre programme 
peut être elle-même RUN. 


Commande D (destruction) 


Le programme demande les numéros extrèmes 
de la zone à détruire. Vous répondez par exemple 
: 150,200 


Commande L (liste) 


On obtient le listing du programme utilisa- 
teur, tandis que la commande List de BASIC don- 
nerait en tête le programme LIBRARIAN lui-même. 


Précautions 


Nous donnons ci-dessous deux versions du 
programme (P.E.T. 2001 et CBM, valable pour 


3000, 4000 et 8000). Nous donnerons ultérieu- 
rement une version VIC. 


Le programme doit être tapé tel quel sans 
espace supplémentaire. En particulier l'adresse 
du POKE 1287... (ligne 34) dépend de la taille 
du programme : elle deviendrait fausse si vous 
modifiez le programme. 


L'explication du fonctionnement du pro- 
gramme est hors du propos de cet article. Tout 
repose sur l'utilisation du tampon clavier qui 
sera discuté dans le prochain numéro. 


Ce programme est la version améliorée 
d'un programme publié par l'auteur dans Micro- 
computing d'avril 80. 


Daniel-Jean DAVID 
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* PROGRAMME DE REFERENCE  * 
+ L 1 
* CROISEE EN BASIC = 
+ L < 
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#* Un utilitaire bien pratique ** 
#*# pour ceux qui ne possèdent pas EVEX ** 


Lorsque l'on veut rajouter des variables à un programme 
BASIC, il est fastidieux de rechercher les noms qui ne sont pas uti- 
lisés, surtout si le programme est long. 


D'autre part il est bien agréable de connaître, à des fins 
de documentation d'un programme, les numéros de lignes des GOTO, 
GOSUB et autres THEN. 


Examinons la structure d'un programme BASIC : 


début 
lien numéro de ligne texte 00 
lien numéro de ligne texte 00 
00 00 


Début est l'adresse de la première ligne du programme: 1025 en 
décimal (0401 en hexadécimal). 


Les deux premiers octets sont constitués par l'adresse basse et 
l'adresse haute de la ligne suivante (lien). 


Les deux octets suivants sont constitués par le numéro de ligne. 

Ensuite vient le texte de la ligne terminé par un octet à zéro. 

La fin du programme est indiquée par un lien égal à zéro. 

Le texte d'une ligne se trouve sous forme compacté au niveau des 
mots-clefs du BASIC. Par exemple "END" est représenté par 128 en 


décimal, "PRINT #" par 152. Chaque instruction ne prend donc qu'un 
octet. Le reste du texte est tel que vous l'avez rentré au clavier. 


PRO 


Hair ee 


4e Et %t 


ra 


Sur les disquettes 3040 (4040), le programme se trouve 
chargé de la même manière, sauf que les deux premiers octets lus 


sont l'adresse du programme (toujours $0401 pour un programme BA- 
Slt 


La 3040 permet de lire un programme comme si c'était un 
fichier, il est donc facile de voir la manière de renuméroter sim- 
plement un programme. 


Le programme de référence-croisée qui suit va vous permet- 
tre de sortir la liste des variables (option: variables) avec le 
numéro des lignes où elles sont référencées, ou bien la liste des 
numéros de lignes GOSUB, GOTO, THEN avec les numéros des lignes où 
se trouvent GOSUB, GOTO et THEN. 


Il vous est ainsi possible de sortir cette liste sur impri- 
mante. 


X$(1500) peut être réduit à X$(500) pour un 16 K. 

Le programme est assez lent, il serait souhaitable de l'é- 
crire en langage machine, mais à ce moment la rentabilité de l'opé- 
ration vis-à-vis de l'achat d'EDEX est douteux. 


Bon courage. 


Jean-Luc DESCHAMPS 
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LE LECTEUR DE CARTES 
CHATSHORTH MR 500 
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ERLERRRERERLERELLRERELRELRLRREEEEX 


Pour notre premier banc d'essai d'un matériel non Commodore 
compatible, nous frappons fort. Voici en effet un appareil qui est 
assez cher (750$) pour la microinformatique, mais qui est doté d'im- 
menses possibilités. 


En effet, il s'agit d'un lecteur capable de lire des cartes 
marquées au crayon noir. Chaque carte (modèle ci-dessous) a 40 co- 
lonnes (signalées par des marques de synchronisation, donc on peut 
avoir des nombres de colonnes différents). 

La carte ci-dessous porte le message "LA COMMODE" en code 
Hollerith. Ce code est celui qui est utilisé pour les cartes perfo- 
rées des gros ordinateurs. Chaque colonne a 12 positions de "perfo- 
ration", donc chaque caractère est représenté par 12 bits. Le blanc 
à le code 0...0 (absence de perforation). Les chiffres ont pour code 
une perforation à la position correspondante. Pour les lettres, il y 
a une perforation en & (pour À à I), en - (pour J à R) ou en 0 (pour 
S à Z) et une perforation de 1 à 9. Par exemple À à pour code &1 
(100100000000) (on En comme bit 1 la présence d'une marque ou 
d'une perforation, 0, l'absence). 


GE TT 


LE ÉÉÉÉFÉELÉEREr 








pa Dpt ET 

25h29 ire 1 re à 
DORE mon oui 
2uum ais a. HE ee a RE : FH 
SDOO BEEN HD an DR N DAE D 

TU Dole os 626 : sis TE ï de: iii E 

Fan tie de UD UMUMUULEL Érns LÉ 
ÉÉCELE: PERS EPP EEE EERE CARE 
099: 191299999191 
Il faut noter que le lecteur est sensible à la conductivité 
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conductrice et il faut utiliser un crayon à mine et non un feutre. 
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Le lecteur se présente sous la forme d'un 
cube avec une fente par laquelle on entre les 
cartes à la main. Dès qu'on présente une carte, 
le lecteur démarre, la carte est lue le temps de 
dire “zip” et ressort à l'arrière. Le lecteur se 
connecte au port parallèle utilisateur du PET- 
CBM (tous modèles). 


Les applications sont innombrables, par 
exemple en gestion des stocks : la dernière piè- 
ce d'un produit sera accompagnée d'une carte. 
Lors de la sortie de cette pièce, la carte est 
passée au lecteur pour enregistrer la nécessité 
de recommander des pièces. Ceci peut être utile 
en pharmacie. Un autre domaine privilégié peut 
étre celui.des examens scolaires dits par "QCM" 
(questionnaires à choix multiples) : l'élève 
doit répondre à des questions pour lesquelles on 
lui propose un choix de réponses: il suffit que 
l'élève noircisse sur la carte, la case corres- 
pondant à son choix dans la colonne correspon- 
dant à la question. L'examen sera alors traité 
très rapidement, la saisie étant toute faite. 
Ceci serait très utile aussi pour l'examen du 
permis de conduire, donc pour les auto-écoles. 
D'autres domaines d'application sont la saisie 
d'enquêtes, la prise de commandes par les repré- 
sentants etc... 


L'interface du lecteur 


Le lecteur se branche au secteur par un 
petit transformateur style calculette. Pour 
notre exemple, nous avons incorporé celui-ci à 
l'intérieur (il y a la place) : c'est plus es- 
thétique. Il se relie au PET/CBM par le port 
parallèle utilisateur. La difficulté est que le 
port contient 8 bits alors que chaque colonne 
fournit le code sur 12 bits. Voici la solution 
offerte par Chatsworth: les 12 bits sont trans- 
mis 6 par 6 et c'est par une ligne reliée à CB2 
que le programme indique s'il veut lire la 
première moitié (4 à 9) ou la seconde (& à 3). 


port parallèle utilisateur PA 


CB2 PA7 PA6 PA5 PA4 PA3 PA2 PA1 PAO 
(sortie) (entrées) ' données ! 
ROUES Der a+ 9 
: ' si CB2 haut 
ES LIGA) 
commande ' ; à ' Ù : 
| & - ü 1 2 3 

si CB2 bas 

(CB) 


| (le bit est à O0 si il y a une marque) 
&synchro 1=absence de marque 
O=marque présente 
1 si carte présente 


Fig. 1 Schéma de l'interface du lecteur Chats- 
worth 





Compte tenu de cet interfaçage, le 
lecteur est livré avec un programme dont nous 
avons développé une version simplifiée et qui 
obéit au schéma suivant (nous expliquerons ce 
programme de façon détaillée dans notre prochain 
numéro à titre d'exemple de programmation d'en- 
trées-sorties en langage machine): 


Le programme est activé lors des interrup- 
tions périodiques du CBM (le vecteur d'interrup- 


tion est dérouté): 


si pas de carte présente aller au 
traitement d'interruption normale 
si carte présente alors 
boucle sur 40 colonnes 
attendre marque de synchro 
initialiser CA et CB à FF 
tant que marque de synchro 
présente 
si CB2 = O0 (bits & à 3) 
CB = CB AND PA 
si CB2 =1 (bits 4 à 9) 
CA = CA AND PA 
fin de tant que 
traduire le code contenu en CA, CB 
en code écran CBM 
ranger le code écran dans la mé- 
moire d'écran dans la ligne où se 
trouve le curseur 
fin de la boucle sur les colonnes 
forcer un retour chariot dans le tampon 
clavier 
forcer clignotement du curseur 
retour à la routine d'interruption norma- 
le. 


Les AND lors de la lecture ont pour effet 
de déceler la présence de marques de façon cumu- 
lative : 11 y a plusieurs échantillonnages pen- 
dant que l'on se trouve en face d'une marque de 
Synchro, ce qui diminue les risques de ne pas 
déceler une trace de graphite. 


Le fait de ranger les codes écran des 
caractères lus dans la mémoire à la ligne où se 
trouve le curseur permet de lire une carte par 
une simple instruction INPUT en BASIC ! C'est 
très astucieux et cela rend l'usage de ce lec- 
teur extrèmement commode. Voici un exemple de 
programme qui lit une série de cartes (associé 
au programme en langage machine esquissé ci- 
dessus ): 


10 SYS 31920 RE déroutement de l'in- 
terruption 

20 INPUT A$ 

30 PRINT A$ : REM ou tout autre trai- 
tement des données lues 

40 GUTO 20 


Si au clignotement du curseur, on répond 
au clavier, c'est le clavier qui sera lu. Si on 
répond en insérant une carte, c'est la carte qui 
sera lue. C'est extrèmement souple, d'autant que 
le fonctionnement du lecteur lui-même nous a 
paru impeccable. 


Pour se procurer le lecteur 


J1 n'y a pas actuellement d'importateur en 
France. Vous devez donc écrire individuellement 
à CHATSNORTH DATA CORPORATION 

20710 Lassen Street 

CHATSHORTH California 91311 USA 
en commandant un 

MARK READER MR 500 

pour CBM en 220 V prix 750$ 


Nous sommes prêts à vous aider en cas de 
difficultés. 

Prévenez-nous lors de votre commande pour 
qu'on voie si les délais sont raisonnables. 

Maintenant, peut-être un distributeur 
voudra-t'il se lancer dans la vente de ce 
lecteur ? 


Daniel-Jean DAVID 


Ce Pre 22° 2 


Mis à part le VIC qui commence tout jus- 
te sa carrière, il y a quatre modèles principaux 
de microordinateurs Commodore en circulation. 
Mais chaque modèle comprend un certain nombre de 
variantes et chacun dispose de sa propre gamme 
de périphériques. C'est dire -et les conversa- 
tions que nous avons pu avoir avec ceux qui nous 
ont rendu visite au SICOB l'ont bien montré- 
qu'il est particulièrement opportun de faire le 
point. 


C'est en réponse aux questions qui nous 
ont été posées au SICOB dans ce contexte que 
nous avons décidé de faire ce cahier spécial 
compatibilité. Nous allons d'abord essayer de 
caractériser de la façon la plus précise possi- 
ble chacun des éléments de la gamme Commodore en 
décrivant en quoi il diffère des autres et aussi 
en quoi il leur ressemble. 


Les principaux points à examiner dans ce 
contexte sont : 


- quels périphériques sont connectables ? 

- comment doivent être adaptés les prograrimes ? 

- peut-on transformer un modèle en un autre ? 
Le point essentiel qu'il faut d'ailleurs 

retenir de cette introduction est la grande 


compatibilité qui règne d'un bout à l'autre de 
la gamme : 





® € 


sexe > . 
ROGUE 


CAHIER SPECIAL COMPATIBILITE 
INTRODUCTION GEMERALE 


RERRSRRRRRRRSERRÉELRRRERRELERRELRERE 


a) on a le même BASIC sur toutes les unités 
centrales de la gamme (sauf les instructions 
disques de BASIC 4.0) 


Conséquences : 


- un programme purement BASIC doit 
passer tel quel d'une machine à l'autre. Les 
seules adaptations qui peuvent s'avérer néces- 
saires sont de modifier les ordres d'écriture 
pour tenir compte de la largeur d'écran lors- 
qu'on passe au 8000. 


- on retrouve sur toute la gamme les 
mêmes facilités d'édition des programmes par 
mouvement de curseur, facilités qui étaient dès 
le début un point fort du P.E.T. 


Les différences n'affecteront de fait 
que la frange des utilisateurs qui font appel à 
des astuces basées sur les adresses stratégiques 
du système, ou qui, en langage machine, appel- 
lent des routines système. Il est en principe 
très facile de repérer les endroits à modifier: 
on trouvera dans la suite une étude de cas d'un 
tel passage d'une machine à l'autre, et on trou- 
vera aussi la table de correspondance des prin- 
cipaux points d'entrée du système sur 2000, 3000 
et 4000/8000. 


b) les périphériques d'un niveau peuvent se 


connecter aux U.C. d'un autre niveau grâce à la 
modularité apportée par le concept du bus IEEE. 


Daniel-Jean DAVID 
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Cahier spécial compatibilité 


ELRRRRERRRRERELRLLLELRERRRERRRREREE EX 


* = 
= LES DIFFERENTS MODELES = 
* * 
a D'UNITES CENTRALES = 
* * 
* * 


LRELRLERRRERERRLLELLELLERRERLERE 


11 y a quatre modèles d'unités cen- 
trales, le P.E.T. 2001, le CBM 3000, le CBM 4000 
et le CBM 8000, si nous excluons de cette étude 
les futurs modèles VIC 20 et CBM 9000 Micro- 
mainframe. Voyons-les dans l'ordre chronologique 
de commercialisation. 


LE P.E.T. 2001 


À part le fait qu'il est le plus an- 
cien de la gamme, le P.E.T. 2001 se distingue 
par : 


- Son caractère monolithique : même le magnéto- 
phone est incorporé dans le coffret. 


- Son Caractère bas de gamme : la mémoire vive 
à l'intérieur du coffret est limitée à 8 K (mais 
on peut l'étendre à l'extérieur). 


- son clavier à petites touches, d'aspect non 
professionnel. 


Le point important à noter est qu'il y a en 
fait deux catégories de P.E.T. 2001 que nous 
allons appeler P.E.T. 2001 À (11 s'agit des pre- 
mières unités qui ont été livrées) et le P.E.T. 
2001 N (qui a été livré ensuite). Le P.E.T. 2001 
N ayant, à l'intérieur, la même carte que le C8il 
3008, seul le P.E.T. 2001 À possède véritable- 
ment les caractéristiques proprement P.E.T.. 


LE P.E.T. 2001 A 


Les caractéristiques du P.E.T. 2001 A 
(outre le clavier à petites touches et le magné- 
tophone incorporé qu'il partage avec ie nouveau 
modèle) sont : 


a- BASIC première version (dit BASIC 
1.0) caractérisé par : 


- absence de moniteur langage machine incorporé 
en MEM. 

- gestion de l'IEEE qui interdit les disques 
(mais permet l'imprimante). 

- impossibilité d'avoir des tableaux de plus de 
256 éléments. 


b- au point de vue hardware : 


-connecteur bus (celui sur le coté droit quand 
on regarde le P.E.T.) en 2x40 contacts, nez de 
carte, pas 2,54. 

- liaison entre la ligne ATN de l'IEEE et l'ai- 
lumage d'écran ce qui permet par POKE 55409,52 
d'éteindre l'écran, et de le rallumer par POKE 
59409,60 sans altérer la mémoire d'écran, ce qui 
est très utile pour les dessins animés. Cette 
liaison a été supprimée sur tous les modèles 
ultérieurs car elle avait pour effet, entre au- 
tres, que l'écran s'éteignait à la fin de chaque 
ligne envoyée sur l'imprimante. 

- gestion de l'écran qui produit de la neide 
lorsque l'on fait des POKE dans la mémoire 
d'écran. 


D'autre part le P.E.T. a le même jeu 
de caractères que tous les modèles de la gamme 
mais, en mode texte (POKE 59468,14), on a les 
majuscules sans SHIFT et les minuscules avec 
SHIFT alors que tous les autres modèles (y com- 
pris le 2001 N) ont un comportement plus proche 
de celui d'une machine à écrire: c'est les ma- 
juscules qui s'obtiennent avec SHIFT. 


Enfin, et c'est très important du 
point de vue extensibilité, le 2001 A a une 
mémoire vive statique limitée sur la carte à 8 
K. Toute extension RAï doit être extérieure. 


Est-ce tout ? Que non! Il y a encore 
une distinction à faire parmi les 2001 anciens: 
Nous appelerons 2001 A1 le modèle qui a des 
mémoires mortes à 24 broches, en principe des 
SYNERTEK et qui est le plus ancien, et le 2001 
A2 le modèle (plus répandu que le A1) qui a des 
MEki 28 broches (des 6540 de “OS TECHNOLOGY). Le 
point le plus important est que vous pouvez 
changer les MEM d'un 2001 A2 pour obtenir ce 
qu'on appelle le P.E.T. “new ROMs"' qui possède 
le même système que le 3000, donc : 


- moniteur langage machine incorporé 

- disques connectables 

- tableaux de plus de 256 éléments 

- possibilité d'utiliser la ME“ EDEX 2.0 


Le f Oui, mais comment reconnaitre 

NÉS < le modèle qu'on à ? 
1- ie pas se fier au marquage sur la façade: 

des P.E.T. ont été marqués CBM et vice versa. 

2- Le clavier donne une idée évidente de la 
distinction. 

3- À la mise sous tension le 2001 A imprime 
*#X COMMODORE BASIC *** tandis que le 3008 ou le 
new ROfs utilise des #. La distinction peut se 
faire à l'intérieur d'un programme : 

PEEK (50003) vaut O sur un ancien P.E.T. et 1 
sur un 3008 (N) ou un ‘new ROMs". 

4- Pour distinguer entre un Af et un A2, il 
faut ouvrir le PET et examiner les boîtiers MEM 
(7 boîtiers vers le milieu): il suffit de comp- 
ter les broches. 

5- Pour distinguer entre un ÿd et un A2 "new 
ROHs"', 11 suffit d'examiner le connecteur bus 
(voir ci-dessous sa description sur le 3008). 


LE Cô SERIE 3000 


- {1 y a trois modèles d'unités centra- 
les série 3000, appelés 3008, 3016 et 3032, les 
derniers chiffres indiquant la taille de la MEV. 
La carte électronique est exactement la même 
pour les trois tailles mémoire et il en résulte 
que l'on peut passer de 8 à 16 et de 16 à 32 K 
assez facilement. {1 suffit de changer les boi- 
tiers mémoire et certains cavaliers comme l'ex- 
plique un article de ce même cahier spécial 
compatibilité. 


Quels sont les progrès accomplis en 
passant d:: 2000 au 3000 ? 


Matériel. 

Les 3000 disposent d'une nouvelle 
carte (qui est la même que les 2001 N) carac- 
térisée par : 


1- MEY dynar‘que, avec 
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- passage possible sur la même carte de 8 à 16 
et 32 K 

- moindre consommation. Un des problèmes pour 
les "bricoleurs" est de trouver du 5 V pour 
leurs montages. Une solution évidente est la 
broche 2 du connecteur du second magnéto, mais 
sur le P.E.T. ancien on ne dispose que d'un cou- 
rant très faible. On peut en obtenir un peu plus 
sur CBM grâce à la moindre consommation des MEV. 


2- MEM de 4 K (2332) sauf en E000-E7FF 
qui est une 2 K. La conséquence est que, sur les 
7 emplacements possibles 4 seulement sont oc- 
cupés : il y a trois emplacements libres pouvant 
chacun recevoir une ROM ou une EPROM (2532) de 4 
K octets. Cela ouvre des possibilités très inté- 
ressantes : 


- installation d'utilitaires, comme EDEX, ou 
TRIEXS A1PLOTTEXS 227 

- installation d'une EPROM contenant votre pro- 
pre application. 

- emploi de "ROM de protection" pour certains 
logiciels (ex. VISICALC). 


3- Connecteurs différents 


- échange des rôles des connecteurs magnéto 1 
et magnéto 2 du P.E.T. ou CBM. 11 faut noter que 
ceci est fait par cavaliers sur la carte: en 
trois endroits (en arrière du 6502, derrière le 
connecteur clavier et à droite du connecteur 
clavier entre les deux groupes de résistances) 
vous trouverez un groupe de 4 pastilles reliées 
ainsi sur un CBM : st 1 


Pour avoir le magnéto 1 à gauche et non derriè- 
re, ce qui libère le connecteur arrière pour 
certains montages, vous donnez un petit coup de 
sc-pel aux traces du circuit imprimé et établis- 
sez des cavaliers ainsi : _ 


- Nouvelle forme du connecteur bus, formé main- 
tenant de deux connecteurs mâles 2x50 contacts 
pour nappe souple. Notez que par une étrange 
aberration (corrigée sur les 8000) les deux 
connecteurs sont trop rapprochés ce qui oblige, 
par exemple, à limer les connecteurs femelles. 
Cette fois toutes les lignes adresse sont trarns- 
mises. 


- Connecteurs supplémentaires sur le milieu de 
la carte fournissant les signaux vidéo et des 
alimentations non régulées +9V, -9V +16 V. 


- Les connecteurs IEEE et port-utilisateur 
sont, en revanche, identiques au P.E.T. 


- Nouvelle gestion de l'affichage qui supprime 
la neige. 


- (la plus visible): clavier nouveau de type 
professionnel. Notez qu'il y a d'ailleurs deux 
modèles de clavier: H (normal) et B (business). 
Le modèle B n'a pas été importé en France. 


Logiciel. 


Le système a été entièrement réécrit, 
constituant la version &ASIC 2.0. Ii se caracté- 
rise par : 


- un réordonnancement complet des adresses 
stratégiques du système avec notamment une meil- 
leure utilisation de la page zéro. Cela oblige à 
une révision soignée des programmes à astuces 


qui font appel à ces adresses. Des tables de 
correspondance existent dans de nombreux livres 
(notamment le PET revealed, le BC et le volume 
11 de la pratique du PET/CB“), nous ne les répé- 
terons donc pas ici. 


- un changement des adresses des routines sys- 
tème. Nous donnons plus loin dans ce numéro une 
table de correspondance qui est à utiliser dans 
certaines adaptations de programme:. 


- la meilleure utilisation de la page zéro pro- 
cure une (légère) amélioration des performances. 


- les trois points fondamentaux déjà signalés : 


* moniteur langage machine incorporé 
en HE 

* gestion de l'IEEE permettant les 
disques 

* tableaux de dimensions ) 256. Un 
autre point de détail concerne certaines dif- 
férences dans la façon d'effectuer certains 
arrondis. 


- lorsqu'on effectue un RESET avec la broche 
“diagnostic sense" à la masse, on passe dans le 
moniteur langage machine, ce qui offre une ma- 
niére de déplanter un programme sans perdre la 
mémoire. 


- l'interruption non masquable est maintenant 
utilisable et, en standard, elle conduit à 
imprimer "READY" (autre façon de déplanter un 
programme). 


LE CH 8000 


Le CBli 8032 est le premier CBM à disposer de 
la version BASIC 4.0 (il n'y à pas eu de BASIC 
3.0 diffusé). 


Il se caractérise par : 
“atériel . 


a- nouvel écran 15 pouces permettant 
un affichage de 25 lignes de 80 colonnes. 


b- nouveau clavier ressemblant encore 
plus à celui d'une machine à écrire. En France, 
ce clavier peut etre remplacé par un clavier 
AZERTY accentué, possibilité qui n'existe que 
sur ie 8000. 


c- nouvelle carte interne caractérisée 
par : 


- mémoire vive dynamique placée plus près des 
régulateurs ce qui est censé éliminer certains 
problèmes des 3000, problèmes dont nous devons 
dire que nous ne les avons jamais constatés pour 
notre part. 

- un emplacement de mémoire morte libre en 
moins (voir ci-dessous les aspects logiciels). 

- quelques variantes sur les connecteurs : 

* les connecteurs des magnétos exis- 
tent toujours. Celui du magnéto 2 vient à côté 
du connecteur bus. 

* les connecteurs bus ont deux signaux 
différents. Ils ont maintenant un signal NOROM 
qui permet de désactiver les “Eh et donc d'en 
activer d'autres à la place et un signal PEN- 
STROBE à utiliser en conjonction avec un crayon 
lumineux. Le connecteur J9 est maintenant décaié 
ce qui permet un branchement facile. 
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* la broche 11 du connecteur port- 
utilisateur transmet maintenant le signal CA2 : 
le port-utilisateur est donc muni de ses signaux 
de commande complets. 

* gestion de visualisation par un boi- 
tier 6845 (contrôleur d'écran programmable, ce 
qui devrait permettre des astuces sensationnel- 
les). ; 

* petit haut-parleur (branché comme on 
l'a expliqué dans La Commode 1 p. 54) qui fait 
cui-cui à la mise sous tension et quand on arri- 
ve en fin de ligne. 


Logiciel 
Les principales nouveautés sont : 
1- BASIC 4.0 caractérisé par 


- nouvelle routine de "garbage collection" bien 
plus rapide 


- nouvelles commandes disques, d'où les 4 K de 
MEM supplémentaires nécessaires. 

- nouvelles variables réservées à l'état disque 
DS et DS$ 


- le disque est maintenant le périphérique 
principal: SHIFT RUN fait charger et exécuter le 
premier programme trouvé sur la disquette 0 et 
non plus sur la cassette. 5 


2- nouvelles adresses des routines en HE 


(voir la table de correspondance dans ce cahier 
spécial compatibilité). 

En revanche, les adresses stratégiques et 
notamment La page zéro sont très peu modifiées. 
Les changements sont cités dans une table qui 
fait partie de ce cahier spécial. Le principal 
changement est que Le tampon du second magnéto 
est fortement occupé par le système. Notez qu'à 
l'adresse 151, on a maintenant le code ASCII de 
la touche enfoncée. 


- nouvelles possibilités d'édition sur l'écran 
comme "scrolling", suppression de tin de ligne, 
définition d'une fenêtre d'écran, etc... 


Notez qu'à la mise sous tension on est en 
mode texte, avec lignes écartées. POKE 59468, 12 
fait passer en mode graphique avec lignes écar- 
tées. Certains caractères graphiques ont disparu 
du clavier, mais ils existent toujours avec 
CHRS(...). PRINT CHR$(142) (passage inverse 
CHR$(14)) fait passer en mode graphique mais 
avec en plus resserrement des lignes. 


- EDEX est livré d'office sur 8000. Notons 
qu'il y en à trois versions: 4.0 pour le clavier 
QHERTY, 4.1 pour L'AZERTY et 4.2 qui marche pour 
les deux. 


En principe toutes les nouveautés de- 
vraient être transparentes en BASIC : il ya 
compatibilité vers le haut de sorte que les 
programmes BASIC 3000 doivent passer en 8000. 
Les points à surveiller sont : 


* utilisation de la variable DS et DSÿ 
(eh oui!) 


* adaptation des ordres d'impression à 


LE CBH 8096 


Le CBii 8096 consiste en un 8032 auquel on 
a ajouté une carte de 64 K de mémoire supplémen- 
taire. L'espace adressable du 6502 restant limi- 
té à 64 K, toute cette mémoire ne peut être 
active en même temps et il faut donc des logi- 
ciels qui en tiennent compte pour l'exploiter. 


Il y a totale compatibilité avec le 8032 
sous deux aspects : 


- un cas particulier de fonctionnement est 
celui du 8032 classique 

- on peut acheter un 8032 et passer plus tard 
au 8096 puisque la transformation consiste à 
ajouter une carte à l'intérieur. 


LE CBM 4000 


ie CBM 4000 n'existe qu'en deux tailles 
mémoire : 4016 et 4032. Ii forme un intermédiai- 
re entre le 3000 et le 8000 puisqu'il a l'écran 
40 colonnes, mais le BASIC 4.0. Il n'a en revan- 
che pas les facilités supplémentaires d'édition 
du 8000. Donc les programmes devraient pouvoir 
passer presque tous tels quels du 4000 au 8000, 
les seuls points à surveiller étant la largeur 
d'écran et certaines gestions de l'écran. 


De fait, il y a deux modèles de 4000 que 
nous appelerons 40xx-P et 40xx-G. Le premier (P) 
a un écran 9 pouces (comme le 3000) et la même 
carte interne que le 3000, dont il ne diffère 
que par les “EM. À ce propos, il est très facile 
de transformer un 3000 en 4000: il suffit de 
changer les “Et. Notons que cela laisse un em- 
placement libre en moins. Le principal avantage 
de cette opération étant le nouveau “garbage 
coliection" et les opérations disque. Voyez 
aussi, dans ce numéro, le "bricolage" 43032. 


Le second modèle, qui sera le seul livré 
dorénavant a un écran 15 pouces comme le 8000. 
“ais il est toujours en 40 colonnes : les carac- 
teres sont plus gros ce qui peut être très 
intéressant dans l'enseignement. À l'intérieur, 
il a la même carte que le 8000. En revanche, son 
clavier reste celui du 3000. 11 n'est donc pas 
possible de transformer un 400U-G en 8000. 


De fait, les ME B0OO6, C000, D000 et FO00 
sont les mêmes sur C8M 4000-P, 4000-G et 8000. 
Seule La ROM E000 existe en trois versions. Le 
4000-G ne diffère du 8000 que par une inter- 
prétation dirferente du clavier et une gestion 
différente du 6845. 


Le 4000-G diffère par quelques points de 
détail du 4000-P et sur ces points il se rappro- 
che du 8000 : 


- il y a répétition automatique des touches 
curseur et espace. 

- à l'adresse mémoire 151, c'est le code ASCII 
de la touche enfoncée qu'on trouve. 


Nous donnons dans ce même cahier une étude 
de cas d'adaptation d'un programme en langage 
machine de 3000 à 4000. 


Une autre différence (temporaire) est que 
ie 4000 n'a pas encore sa version d'EDEX. Vous 
trouverez dans ce numéro un programme: LIBRARIAN 
qui remplit quelques unes des fonctions d'EDEX. 

Daniel-Jean DAYID 
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DE CASSETTES 


CSM" 
Model 4016 


Les avantages de la micro-informatique professionnelle 
dans une configuration adaptée 
à l’enseignement et aux applications individuelles 


Programmes sur cassettes 


des programmes de jeux et d’ensei- 
gnement sont disponibles sur cassettes. 


Compact 

unité centrale, clavier et écran sont 
intégrés dans un même coffret. 
Fiable 

la fiabilité des CBM est exceptionnelle. 
L'électronique, particulièrement bien 
conçue, est fabriquée avec tout le pro- 
fessionnalisme qui a fait la réputation de 
Commodore. 

Lecteur de cassettes 

pour la lecture et la sauvegarde des pro- 
grammes et des informations. Le lec- 
teur de cassettes Commodore est hau- 
tement fiable. 


Basic étendu 
interface IEE 488 


Extensions 


le CBM 4016 peut bénéficier de toutes 
les extensions disponibles sur la série 
CBM 4000. 











SO 
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LES UNITES DE DISQUES 


* 
+ 


TREK ERELERRERLLERERERÉERRE EX 


Il existe trois modèles d'unités de dis- 
ques souples Commodore, les 2040 et 3040 qui ne 
font qu'un, les 4040 et les 8050. Toutes sont 
des unités à double platine, utilisant des 
minis-disques souples de 5 pouces 1/4. Toutes se 
connectent au CBM par le bus IEEE, où elles oc- 
cupent le numéro de périphérique 8 en standard. 
Toutes ont la même philosophie de périphérique 
intelligent, recevant de la part de l'unité cen- 
trale des chaînes de commande que le système 
d'exploitation disque (SED, DOS en anglais) qui 
réside dans l'unité de disques, va interpréter 
et exécuter indépendamment de l'unité centrale. 
Ceci est un facteur de compatibilité. 


Toutes ces 
rences matérielles 


unités présentent des diffé- 
et logicielles rendues plus 


complexes du fait qu'on peut les utiliser soit 
avec BASIC 2.0, soit avec BASIC 4.0: Essayons 
d'y voir clair. 

Le graphique ci-dessous établit une 


classification à deux axes : 


capacité 
1M 8050 
340K 3040 4040 
FR 0e mieu: dt 
SED 
Il apparaît que la 3040 et la 4040 sont 


physiquement proches: à peu près même capacité, 
chacune peut lire les disquettes créées par 
l'autre, alors que la 8050 à une capacité tri- 
ple. La 4040 et la 8050 sont semblables au point 
de vue logiciel: elles ont le SED version 2.0, 
donc les nouvelles fonctions alors que la 3040 à 
la première version. 


Compatibilité 3040-4040 


La 3040 et la 4040 sont physiquement la 
même unité. Ce qui change, c'est les MEf conte- 
nant le système. D'ailleurs, on peut transformer 
une 3040 en une 4040 par simpie changement des 
MEM (il faut changer le 6530 et les deux 2332 
déjà présents, et rajouter une 2332 sur L'empla- 
cement libre). On peut aussi faire la transfor- 
mation inverse. 


Au niveau des informations écrites sur la 
disquette, il y a des analogies et des différen- 
ces. Il y a 35 pistes pour l'une et l'autre mais 
le formatage est différent. Cela a deux consé- 
quences : 


1- légère baisse de capacité de la 4040, 
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qui, vide, affiche 664 blocs libres contre 670 
en 3040, donc 1,5 K de moins de capacité. 


2- compatibilité en lecture, mais pas en 
écriture. Une 3040 peut lire une disquette créée 
sur 4040 mais pas écrire dessus. Une 4040 peut 
lire une disquette créée sur 3040 mais pas 
écrire dessus. Ce point est dangereux sur 3040, 
qui.si l'on essaie d'écrire sur une disquette 
4040, corrompt la disquette qui devient illi- 
sible sur toute unité. Si, sur 4040, on essaie 
d'écrire sur une disquette 3040, il y a diagnos- 
tic 


Pour pouvoir utiliser sur votre nouvel- 
le 4040 une disquette 3040, il faut la copier. 
Pour cela DUPLICAIE ou BACKUP ne marchent pas. 
Il faut formater la disquette d'arrivée (HEADER) 
puis faire une copie totale (COPY DO TO D1). Il 
faut que la disquette de départ ne soit pas to- 
talement pleine. 


Différences iogicielles introduites par le SED 2 





On peut considérer que le SED 2 intro- 
duit quatre differences ou, si l'on veut quatre 
fonctions supplémentaires. À part cela, il y a 
compatibilité totale en ce sens que "DOS 2" 
accepte toutes les commandes de “DOS 1". Les 
seuls problèmes d'adaptation qui peuvent se 
poser étant certaines différences d'adresses 
absolues en accès direct. Voyons 1es fonctions 
supplémentaires. 


1) autoinitialisation 


{1 n'y a pas normalement besoin d'"ini- 
tialiser" une disquette (il s'agit de la comman- 
de [, pas du formatage) lorsqu'on vient de la 
monter. Dès que vous faites une commande comme 
LOAD, le système initialise la disquette si ce 
n'est déjà fait. Attention, à la différence de 
la 8050, la 4040 ne décèle un changement de dis- 
quette que si toutes ont un ID différent. 


Toutefois, l'envoi d'une commande I 
superflue ne gêne en rien. D'autre part, pour 
utiliser l'accès direct, il faut envoyer une 
commande { préalablement sur 8050 et 4040. 


2) copie totale 


Voilà une extension bien pratique. On 
peut copier tous les fichiers de la disquette O0 
sur La disquette 1 par PRINT4##15, "C1=0" ou COPY 
DC 10 D1 


La disquette Î peut contenir déjà des 
fichiers, mais si un fichier qu'on copie a le 
mème nom qu'un fichier déjà présent, il y aura 
l'erreur 63. 


3) APPEND 


DOPEN#2, "nom" 
séquentiel en lecture 

DOPEN#2, ‘"nom',W ouvre un fichier 
séquentiel, écriture (création) 


ouvre .un fichier 


L'un et l'autre se positionne au début 
du fichier. 


APPENDZÆ2, "nom" ouvre le fichier 
(existant) en écriture mais en se positionnant à 
la fin du fichier, ce qui permet d'ajouter des 
enregistrements. 


Avec le SED 1.0, pour obtenir cet ef- 
fet, il fallait procéder par recopie sur un 
deuxième fichier. 


4) les fichiers relatifs 


Voici un nouveau type de fichiers 
(répertoriés dans le catalogue par REL) qui, à 
lui seul, justifie le passage au SED 2. En 
effet, un fichier relatif offre l'accès direct 
Sans nécessiter de connaître la piste et le sec- 
teur absolu de l'enregistrement cherché: il suf- 
fit de spécifier le numéro de l'enregistrement 
"relativement" au début du fichier, d'où le non. 


Ces nouvelles fonctions sont adaptées à 
BASIC 4.0, mais nous verrons plus bas qu'on peut 
en profiter aussi en BASIC 2.0. 


La 8050 


La 8050 fonctionne sous DOS 2.0, donc 
ressemble beaucoup à la 4040: elle possède les 
fonctions supplémentaires décrites ci-dessus et 
mème, elle va plus loin en ce qui concerne 
l'autoinitialisation. Comme le moteur de la pla- 
tine se met en route lorsqu'on introduit une 
disquette, tout changement de disquette est 
décelé, même si l'1D est le même (ce qui n'est, 
de toutes façons, pas conseillé). 


La différence fondamentale est dans la 
capacité qui est le triple de celle des 3040- 
4040 (et ce, il faut le noter, pour une diffé- 
rence de prix faible). Cette augmentation de la 
capacité est obtenue par une augmentation de la 
densité des pistes le long d'un rayon: on a 77 
pistes, et une légère augmentation de la densité 
d'écriture. On a donné dans La Commode numéro 1 
(p. 15) un tableau donnant les nombres de sec- 
teurs par piste pour chaque modèle. Cela a deux 
conséquences : 


Î- Un programme qui fait appel en accès 
direct aux adresses absolues des pistes et 
secteurs doit être révisé. 


2- il y a incompatibilité physique bien 
que les disquettes soient de mêmes dimensions: 
une 8050 ne peut lire une disquette 3040-4040, 
et inversement (il faudrait pouvoir lire entre 
les pistes). Si vous remplacez votre ancienne 
3040 par une 8050, il vous faudra tranférer vos 
disquettes d'une unité sur l'autre en passant 
par l'unité centrale: cela ne peut être un 
tranfert d'une platine à l'autre dans la même 
unité comme dans le passage 3040-4040. 11 faudra 
donc que, pendant un temps, vous ayez à la fois 
les deux unités. Nous donnons une méthode pour 
le faire dans un autre article de ce numéro. 


Autre incompatibilité physique: vous pou- 
vez transformer une 3040 en 4040, mais pas en 
8050: ce n'est pas la même mécanique. 


Compatibilite BASIC 2.0, BASIC 4.0 


8asic 4.0 se caractérise par de nouvelles 
instructions qui concernent les disques. Mais 
toutes ces instructions ont en fait un équiva- 
lent en BASIC 2.0, de sorte que si l'on à 
connecté une 8050 ou une 4040 sur une unité cen- 
trale 3000, les nouvelles possibilités du SED 2 
sont tout de même accessibles. 


Exemples 


BASIC 4.0 BASIC 3.0 ou DUS SUPPORT 


catalogue sans affecter le programme en mémoire 


DIRECTORY DO >$0 
copie de sècurité 

BACKUP DO TO Di }D1=0 
validation 

COLLECT DO PRINT=£80, "VO" 
formatage 


HEADER ‘nom, Ixx, D1 >N1i: nom,xx 


chargement 


DLOAD “nom LOAD “O:nom",8 
sauvegarde 

DSAVE “nom“,D1,U9 SAVE "1:nom",9 
CÉCRE 


Pour les nouvelles possibilités : 


copie fichier 
COPY “nom",D0 T0 "nom",Di  )C1:nom=0:nom 


copie tous les fichiers 

COPY DO TO D1 PRINT2=80,"C1=0" 
ouverture fichier SEQ 

DOPENZ£82, "nom", D1,U9 OPEN 82,9,2,"1:nom" 


ouverture fichier relatif 
DOPEN82, "nom" ,L(taille) 
OPEN82,8,2,"0:nom",L,"+CHR$(taille) 


accès à un enregistrement relatif 
RECORD#£82, (numéro), (octet ) 
si numéro = 256*N2 +N1 
PRINT2280, "P'4CHRS(2)+CHR$(N1)+CHR$ 
(N2)+CHRS(octet) 


ajoût 


APPEND=282, "nom" OPEN 82,8, 2,"0:nom, A" 


Donc, on peut profiter de tous les avan- 
tages du nouveau SED si l'on connecte une 
disquette “nouvelle sur une ancienne unité 
centrale. L'inverse est moins avantageux: si 
vous connectez une 3040 sur un 4032 ou 8032, 
certains des ordres de BASIC 4.0ne seront pas 
pris en compte si la fonction correspondante 
n'existe pas sous DOS 1 (par ex. RECURD==<) 


Daniel-Jean DAVID 
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La diversité des imprimantes connectables 
aux CBM est très grande, même si l'on ne tient 
compte que des modèles propres à Commodore. De 
toutes les façons, si vous désirez connecter une 
imprimante non Commodore, nous vous recommandons 
de surveiller les points suivants : 


- connexion par le bus IEEE, sinon vous ne 
pourrez pas utiliser les instructions BASIC 
PRINT## et CMD, ce qui exigera un effort de pro- 
grammation. 


- la présence des caractères semi-graphiques 
du P.E.T./CBM, notamment pour les Listings, sauf 
si vous vous bornez aux applications de gestion. 


De fait, les seules imprimantes non Commo- 
dore utilisées assez fréquemment sont les Qume 
ou analogues en traitement de textes (fortement 
concurrencées maintenant par les 8026/27) et la 
Seikosha intéressante par son prix et dont nous 
publierons le banc d'essai dans notre prochain 
numéro. 


Du côté Commodore, on trouve trois groupes 
de modèles : la 3022, remplacée par la 4022/ la 
8024/ les 8026, 8027. Chaque modèle est connec- 
table à tous les modèles d'unité centrale. 


Les 3022/4022 


11 s'agit d'imprimantes moyenne gamme, à 
aiguilles, 90 car/s et 80 colonnes. Toutes deux 
sont d'origine Epson mais ont été reprogramnées 
pour être très intégrées à la gamme CBM dont 
elles ont, notamment, tous les caractères gra- 
phiques et le contraste inversé. 


La 4022 marque un progrès par rapport à la 
3022 sur les points suivants: 


plus compacte 

- plus silencieuse 

- meilleure résolution (8 aiguilles au lieu 
de 7) 

- queiques adresses secondaires en plus. 


L'une et l'autre manifeste qu'eile est un 
périphérique "intelligent" en admettant des 
adresses secondaires qui définissent des fonc- 
tions différentes de l'impression telle quelle 
des caractères reçus, et des caractères de con- 
trole qui modifient l' impression (ex. élargis- 





ES xru-É 


sement, contraste inversé etc...). 


Les caractères de contrôle sont exactement 
les mêmes en 4022 et 3022. Donc, nous n'insis- 
tons pas, leur liste étant dans le manuel cons- 
tructeur (et aussi dans "La pratique du P.E.T. 
/CBM vol 1). Les adresses secondaires de 0 à 7 
sont communes à la 3022 et la 4022; rappelons 
les : 


impression telle quelle 

: impression avec format 

: spécification du format 

: fixation du nombre de lignes par page 
: activation des messages d'erreur 

: définition du caractère programmable 
: définition de l'interligne 

: fixation en mode "minuscules" 


SO OU & Ww D = © 


La 4022 possède en plus les adresses se- 
condaires 


8 (inverse de 7) : 
ques" 


fixation en mode “graphi- 


9 : fin des messages d'erreur (inverse de 4) 
10: reset de l'imprimante 


ais, même sur les adresses communes, la 
4022 a quelques petites différences -qui ont 
fait l'objet de la lettre de notre Lecteur, M. 
SAULOU. 


AS=2 : en 3022, lorsqu'il y a un littéral en 
téte d'un format, il est répété automatiquement 
en fin de ligne, alors qu'en 4022, il faut le 
spécifier à nouveau 


AS=5 : le caractère programmable doit main- 
tenant se fournir sur 8 lignes élémentaires et 
non sur 7 (nombre d'aiguilles) 


AS=b : i'interligne est maintenant fourni en 
192 iè. de pouce et non en 144 jè., car le pas 
élémentaire du moteur pas à -pas a été réduit 
pour améliorer la qualité d'impression. Ainsi, 
pour faire du 6 lignes au pouce il faut faire 
PRINT<6,CHR$(32) (au lieu de 24) et pour faire 
du 8 lignes au pouce, c'est CHR$(24) (au lieu de 
18). 


L'ennui est que, si les deux premiers 
points sont cités dans la brochure, le dernier 


a. ce 220 2 


point ne l'est pas, ou plutôt, ce sont les spé- 
cifications de la 3022 qui sont répétées. 


La 8024 


La 8024 est l'imprimante “de course" 
Commodore. C'est une imprimante à aiguilles, 
mais 132 colonnes sur papier large et 170 car/s. 
De plus, l'impression est bidirectionnelle et 
optimisée (on ne parcourt pas toute la ligne 
pour une impression partielle). 


L'imprimante 8024 est d'origine Tally- 
Mannesmann. Elle est beaucoup plus lourde et 
encombrante que la 4022. 


Au point de vue logiciel, cette imprimante 
est adaptée à la gestion : elle n'a aucune des 
possibilités graphiques de la 4022. Les seuls 
caractères en contraste inversé sont ceux qui 
représentent les mouvements de curseur dans un 
listing. Le seul réglage de l'interiigne est 
entre 6 lignes et 8 lignes au pouce, sous forme 
d'un levier sur l'imprimante: il n'est pas pro- 
grammable par l'adresse secondaire 6 (qui 
n'existe pas sur la 8024). 


Le seul caractère de contrôle est CHR$(1) 
mais il n'y a qu'un degré d'élargissement. 


Les seules adresses secondaires existantes 
sont 0, 1, 2 et 3. Elles jouent le même rôle que 
sur 4022. 


Depuis peu, il y a trois variantes de 
8024: À coté de la 8024-N (normale), on trouve 
la 8024-QL, à qualité d'impression améliorée, et 
qui permet des caractères étroits (on en trouve 
un exemple dans le listing du programme d'astro- 
nomie dans ce numéro), et la 8024-IF, munie d'un 
introducteur frontal. 


Les 8026 et 8027 


11 s'agit des imprimantes à Marguerite de 
Commodore. Elles sont bon marché pour des impri- 
mantes à Marguerite, mais elles sont lentes : 17 
car/s. Elles se ressemblent beaucoup extérieure- 
ment à part le fait que la 8026 possède un cla- 
vier. De fait, la 8026 a un mode de fonctionne- 
ment déterminé par un levier, où elle sert de 
machine à écrire. Notez que ce mode ne permet 
pas de constituer un clavier secondaire pour 
l'ordinateur : l'ordinateur ne peut lire ce cia- 
vier. Ce clavier est toutefois pratique et fait 
de la 8026 une machine double usage: tantot im- 
primante pour l'ordinateur, tantôt machine à 
écrire d'appoint pour le secrétariat. 


Sinon, la 8026 est sans histoire. Elle est 
très bien adaptée au système de traitement de 
textes avec clavier AZERTY TRAITEXT. Notez pour 
cela qu'il faut changer la ROï F000 (et instai- 
ler ce qu'on appelle la ROM 50), et donner à la 
8026 le numéro de périphérique 5 (et bien sr 
l'indiquer à TRAITEXT). 


Naturellement, la 8026 n'a aucun graphique 
(elle n'a que lies caractères de la marguerite), 
aucun caractère de controle, ni adresse 
secondaire. On peut régler l'interligne et 
l'espace entre caractères (10 ou 12 par pouce) 


par des interrupteurs. 


Notons qu'à propos des marqguerites et des 
rubans que l'imprimante est livrée avec une mar- 
guerite standard et un ruban carbone. Celui-ci 
qui est à un seul passage n'est pas très ren- 
table. Mais il en existe d'autres, en tissu, qui 
durent plus longtemps. De même, à coté de la 
marguerite standard (la 802) il en existe d'au- 
tres: voici des exemples d'écritures possibles : 


Je suis la marguerite 802 (10 car/pouce) 
Je suis la marguerite 802 (12 car/pouce) 
Je suis la mrguerite 802 (15 car/pouce) 


Je suis la marguerite 808 (10 car/pouce) 
Jde suis la marguerite 808 (12 car/pouce) 
Jde suis la marguerite 808 (15 car/pouce) 


Je suis La marquenite 813 (10 car/pouce) 
Je suis La marguenite 823 (12 car/pouce) 
Je sus La mrquerite 823 |15 can/ncuce) 


Il serait opportun que PROCEP et les 
Distributeurs se décident à avoir ces fournitu- 
res et non plus seulement un seul type de mar- 
guerite ou de ruban! 


Particularités de la 8027 

Aussi étonnant que cela puisse paraître, 
la 8027 a certains problèmes d'incompatibilité 
avec la 8026 beaucoup de logiciels, dont 
TRAITEXT et 0ZZ ne fonctionnent pas avec elle, 
au premier abord. 


En fait, le principal problème est celui 
du "line feed": il n'est pas automatique à la 
mise sous tension de la 8027. 

[l y a deux solutions : 


a) en BASIC, il suffit d'ouvrir un fichier, 
mais avec un numéro logique supérieur à 128 : Ex 
pour un listing 


OPEN 129,4 : CmD 129 : LIST 


b) on peut lancer le "line feed" automatique 
en envoyant une séquence déterminée de caractè- 
res de contrôle 

OPEN 4,4 : PRINT4#4,CHR$(27)CHR$(80) 

Pour utiliser la 8027 avec TRAITEXT, ne 
pas lancer le "line feed" automatique, laisser 
le numéro de périphérique à 4, ne pas monter la 
RO“ 50 et déclarer l'imprimante comme une 3022. 
À ce moment, seuls manqueront les accents cir- 
conflexes. 


Sinon, la 8027 admet tout un jeu de carac- 
tères de controle qui permettent de régler 
l'interligne et l'espace entre caractères par 
programme. Elle possède l'avance du chariot en 
marche arrière et le positionnement au 96 iè. de 
pouce près, ce qui lui confère des possibilités 
graphiques (exemple ci-dessous). Ceci sera 
détailié dans le banc d'essai complet de cette 
imprimante donné dans le prochain numéro. 


Pierre-Etienne THALBERG 
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Encore un nouveau modèle de CBM dont per- 
sonne n'a entendu parlé ? Non! mais un CBM capa- 
ble de se comporter à la fois comme un 3032 et 
comme un 4032 par simple basculement d'un inter- 
rupteur. 


Ceci nous était utile à la rédaction pour 
tester des programmes fonctionnant sur l'une ou 
l'autre version et ceci peut vous servir si vous 
avez des logiciels anciens qui fonctionnaient 
sur votre 3000 et que vous voulez conserver et 
si vous voulez pouvoir acquérir et utiliser des 
logiciels écrits pour 4000. 


Le bricolage est simple: il va consister 
à superposer sur chaque support de MEM la MEñ 
3000 et la MEM 4000 qui vont sur ce support. 
Attention, il ne faut pas se tromper d'emplace- 
ment. 


Suivez ce tableau: 


support adresse ROM 2.0 ROM 4.0 
F000 03 22 
E000 24 29 
D000 02 21 
C000 01 20 
B000 (EDEX) 23 


Le seul tour de passe-passe est que l'on 
tord vers l'extérieur les broches 20 de chacune 
des mémoires: il s'agit en effet des chip select 
qui devront passer par les interrupteurs. On su- 
perpose alors les deux ROM d'un emplacement et 
on fait un léger point de soudure sur chaque 
couple de broches (sauf les 2U). 





Ro 


On réalise ensuite pour chaque couple de 
ROM le montage : 






+5 V 
> 
17 34% 
br. 20 ROM 2.0 \ 
\ 
inverseur 


br. 20 sur circuit imprime 


En cn ui 
br. 


20 RO 4. 
0 ROï 4.0 3K 


11 faudra donc disposer d'un inverseur 4 
voies qu'on vissera au socle-carter du CBM à 
portée de la main. S'il l'on veut faire la mème 
chose entre la ROM B000 et EDEX, il faut un in- 
verseur supplémentaire. 


Précautions 


- Il faut que toutes les ROM 2.0 aillent 
du même côté de l'inverseur, toutes les ROM 4.0 
aillent du même côté. 


- Les broches 20 de la ROM 2.0, de la ROM 
4.0 et du circuit imprimé qui se correspondent 
doivent aller à la même voie de l'inverseur mul- 
tiple. 


- Les soudures, notamment celles du cir- 
cuit imprimé, doivent être rapides: il vaut 
mieux un fer très chaud (dont la panne doit être 
à la masse) appliqué brièvement qu'un fer tiède 
appliqué longtemps. 


- Les résistances de 3 K sont indispensa- 
bles. On peut prendre le +5 V par soudure sur le 
circuit UG2 qui est à proximité (broche 14). 


- 11 faudra détacher la carte du socle (3 
vis + 3 clips) pour les soudures des emplace- 
ments 20 sur le circuit imprimé. Ne pas se trom- 
per d'emplacement. 


Ce montage annule la garantie, mais vous 
avez probablement votre CB depuis plus d'un an! 


Dès que ceci est fait, selon la position 
des inverseurs, lorsque vous mettrez sous 
tension vous serez en BASIC 2.0 ou en BASIC 4.0. 
C'est encore plus commode si vous installez un 
poussoir de RESET (voir une de nos prochaines 
rubriques Bricolage). 


Pierre-Etienne THALBERG 
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Cette opération est relativement simple. 
Elle se décompose en deux étapes: 


1) installer de nouveaux boîtiers mémoire 
2) positionner les cavaliers qu'il faut. 


Nous supposerons dans tous les cas que 
vous souhaitez arriver à un 3032, 


Si vous partez d'un 3008, vous devrez 
enlever de toutes façons les boîtiers MEV déjà 
présents. 


Si vous partez d'un 3016, il y a deux 
cas; pour le voir, examinez la zone de la MEV, 
Sur la carte de votre CBM (il y a deux rangées 
de 8 emplacements à l'avant de la carte) 


Premier cas Il y a deux rangées de boitiers 
peuplées. 

Ce sont donc des boîtiers 8 K. Il faut les 
remplacer par des 16 K. Yous devez donc suivre 
l'étape 1a). 


Second cas Il y a une seule rangée de boi- 


tiers remplie. 


Ce sont donc des 16 K. Vous avez de la chan- 
ce: vous évitez l'étape ta) et vous n'avez que 8 
boîtiers à acheter. 


Pour certains 3008, mais il n'y en a que 
très peu de livrés en France, les traces de cir- 
cuit imprimé de la deuxième rangée ont été in- 
terrompues. 11 faut donc les rétablir avec du 
petit fil, ce qui est fort délicat. 


Voici les étapes dans le cas normal : 


la) Enlevage des boitiers à remplacer. À moins 
de disposer d'outillage professionnel, la meil- 
leure manière est de couper les pattes des boi- 
tiers avec une pince coupante très fine. Ensuite 
vous videz les trous un à un à la tresse à des- 
souder (avec un fer très chaud, appliqué pendant 
peu de temps à la fois). 


1b) Vous placez les nouveaux boîtiers aux em- 
placements libérés. Pendant que vous y êtes, 
c'est une bonne idée d'installer des supports au 
lieu de souder directement. Bien sur il est 
IMPERATIF de placer les boitiers dans le bon 
sens (ici, l'encoche vers l'avant du CB). Les 
boîtiers doivent etre des 4116 de, au plus, 250 
ns de temps d'accès. 


2) Les ensembles de cavaliers situés en UEZ et 
en UC2 (le long du bord droit ‘de la carte vers 
le milieu et vers l'arrière) doivent avoir l'é- 
tat suivant: 


UE2 UC2 
À interrompu H mis . M coupé 
B interrompu I mis N coupé 
C mis J mis P mis 
D mis K mis R coupé 
E interrompu L coupé S mis 
F mis 


Il est conseillé d'ajouter -s'ils n'y 
sont pas déjà- des condensateurs de découplage 
(de 100 nF environ) aux emplacements situés 
juste devant les mémoires. 


Précautions 


Employer un fer à souder fin, à panne 
isolée, ou mieux à la masse. 


; Il est conseillé pendant votre manip!" 
d'oter de la carte les circuits intégrés les 
plus importants, ou alors d'envelopper la partie 
de la carte sur laquelle vous ne travaillez pas 
dans du papier aluminium que vous appuyez bien 
sur les broches des circuits. 


La Comnode décline toute responsabilité 
dans les problèmes “fumants" qu'entraînerait une 
mauvaise interprétation de cet article. : 


Daniel-Jean DAVID 


( adapté du livre de BC, voir bibliographie) 
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Voici une question qui se posera souvent, avec le rempla- 

cement des 3000 par les 4000. Les problèmes se posent surtout en 

langage machine car en BASIC, il y à compatibilité vers le haut, à 
part la variable DS et DS$. 


Les points à surveiller en langage machine sont: 


- les adresses stratégiques: il y à peu de changements de 3000 à 
4000 


- les adresses des routines système 


- l'implantation du programme: le tampon seconde cassette est 
maintenant en grande partie occupé. 

Examinons un exemple. Nous prenons celui du programme de 
hardcopy d'écran correspondant à une question posée par M. Yvon 
Lhermitte. Le programme lui-même vient du Transactor en passant par 
le Bulletin Procep. Voici la version 3000. 


#=FA035A 
POINT=#IF; POINTEUR POUR ADRESSAGE IHDIREC 
RELAG=#21: POINTEUR RVS 
COMPT=HES; COMPTEUR DE LIGHES 
CR=$OD; VALEUR ASCII DU RETOUR CHARIOT 
PERIFH=#I: HUMERO PERIPHERIQUE 
Che FES 


SLISTHS#FEER, PLACE LINE RIRES EHCLIETEH 
ATHOFE=SFIEL: CAT 


ECRANSHENS, TIEEUT ANFESSE ECEEH ÊL 
MOTESSES AC: GRAPHIQUES OU MIHUSCULEZT 


Z HE, 


FRIHT=SFETEZ: EOUTIME LD'ECRITURE SUR L'ECRAH 


HE L'ÉERAS 


EUSOFF=#FFCC: REMNET LE PFERIFHERIQUE FAR DEFAUT CECEAHI 


FEES SCFET LI H:ECFEH 
20 2 He UDAiIERt us 
En 6 LDH HSECFEAH FOIMTELR AU DÉBUT LE L'ECFEON 
ES LE à SA FENTE 
2 HS Ed LIA #4 
+ 25 EN LE ALES A1 
Éc ES and SHÉNPARMEE 
Se SA ER FA JSR SLISTH: EHVOI.LISTEH 
Ene S STCR 1 JSF ATHOFEF: VERS L'IMNPRIMANTE 
ECOLES PNA SR TRnEZ 
Ête SSNSS STA CÜNMET 9 is 
S ASLAN L'IGHÉ  ÉTACALE.: EME HUM CRSPCUR ACEIMELLECLTAME 
d Si El STA FELAHG: RVS-OFF 
5 cf DE FF ISF FERINT ss : 
Si FR LEA ##11: SHIFT ÆFGLUR MIMUHSCULES 
EH HE SEE LIX MODE 
Es EÉMME CFE #1 
5 IAE ÊHE MIHLE 
PR Se LOUA ##91: SHIFET FOUR GRAPHIQUES 
4 6 IS FF FÉES IESR ERTENT 
Se Hé LI HE SE 
EN td ENCORE LOA CPOINT:, 7; CARACTERE SUR ECFRAH 
E 3 F ANT HÉFF: DESACTIVE EYS 
dt aa TA 










gags ŒSré dS 21 EUR RFLAG 
Gt HSE 16 GE EPL MEME 
Gus Gird El 1F LOA CPCIHTI "7 


4 STA FFLAG 
24 AHI HSE 
ES EUR HESS: EYS CHÉOFFT 
Te FE JER FRIAHT 
MEME TER: FEAFFEL DU CARACTERE 
CHF H#CH 
ECS HOTALF 
CEA #+td4i 
EHE EHWOI 
HOTALE CF 4536 
ECC EH 
CHF H$ÈE 


ZA 4 2 I I 


ho Mio D Gi LE po M 





(RACE 0 
Eu 
ET EN CN a fe fe Le Fe Je Fe 


ll D 
tot 1 


(A 
LACHC NL: 
1 fu 


es 
A 


1 C0 Cu Ti EE 


EPS SR CPL ee TEST FES 


a a ta tord te Qi Ph Eee Fi Ut 
nn ge LL Di M Lin 
1 fr 


eu Lt PF 190 a 0 





mm tt 









4: Et ECS GERFH 
HS HS EE ÛÜRA HSE 
HS TETE: EHE EH 
H2S4 4 CH GEAFH EUR #$CH 
ee Doi EHVOI JSF FERINT: IMPRESSION OI CHEACTERE 
HIS CE IH'r 
eme le CF #48: FIH D'IMPRESSION LE LA LIGHES 
STE RS SIRReE ECC EHCURE: SI HOÜH, RECONMMENCER 
MEN SEE ie LIUA FOIAT 
FENETRE * AUC #23; SI OUI. DEFLACENENT DU FOIHTEUR D'ECRAI 
SHARE EEE tee STA FOIHT: À LA LIGHE SUIVANTE 
4 HEHS Shi AS ECC #+4 
EE ETES SR IHC FOIHT+1 
TOC RS NREMEE DEC COHNPT: LE LIGHE RECOPFIEE 
De AN ie EHE LIGHE: ERANCHENENT FOUR LIGHE SUIVANTE 
a oies SAS AU LI CE 
BTE on EC NE EE JSF FEIHT 
PEN EIRE Se EE JF EUSOFEF; FIN DE LA COPIE D'ECERAH 
AGE HSE EF RTS 
Ann re EF 


Eh bien, si vous disposez de l'assembleur symbolique, les 


= 


seules lignes à changer sont: 
adresse du SYS. Ici on aura SYS 32512 


5 : adresse de départ. On va implanter le programme en 7F00 (fin 
de la mémoire). Ne pas oublier de faire POKE 53,127. 


433% SLISTN 


$FOB5 adresse système changée 


14: ATNOFF = $F148 ; 


En revanche, les adresses de page zéro utilisées ici ne 
changent pas. De même que les vecteurs FFD2 et FFCC. 


Dans tous les cas, la meilleure aide est apportée par les 
tableaux de correspondance donnés dans ce numéro. 


Daniel-Jean DAVID 
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Cahier spécial compatubitité 


COMMENT TRANSFERER UN FICHIER 


D'UNE UNITE DE DISQUETTES SUR UNE AUTRE 


ERLRLLRLERELRRRRELRRERELRERRRÉRRRERELRÉRERERRLEREE ER 


Le problème se pose surtout si, ayant utilisé précédemment 
une unité 3040, vous vous équipez d'une 8050: tous les fichiers que 
vous voulez conserver doivent être transférés et cela ne peut se 
faire avec les commandes classiques de COPY puisque celles-ci 
n'agissent qu'à l'intérieur d'une même unité. 


Il faut donc que vos deux unités soient connectées simulta- 
nément, donc que vous ayez conservé votre 3040 quelques temps après 
avoir reçu la 8050. Les deux unités ne pourront pas fonctionner avec 
le même numéro de périphérique. Heureusement, on peut changer le nu- 
méro de périphérique d'une disquette par logiciel. 


1) Changement de numéro de périphérique 


Vous connectez les deux unités de disques mais vous n'ai- 
lumez que l'une d'elles, par exemple la 3040. Nous allions faire pas- 
ser son numéro à 9. Pour cela 


OPEN 16,8: 155044 (le numéro est encore 8) 
PRINT# 15, "M-W'CHR$(X)CHRS(O)CHRS(2)CHRS(Y)CHRS(Z) 


sur 3040, X=50 
sur 8050 et 4040, X=12 


Y doit valoir N+32 at Z=N+64 où Nest le nouveau numéro. Comme 
ici nous voulons 9 cela donne Y=41 et 7-73 


Pour le transfert proprement dit, il existe un programme ap- 
pelé UNIT TO UNIT qui l'effectue en passant par l'unité centrale. 
Malheureusement, ce programme fonctionne mal pour les gros fichiers, 
fait auquel nous ne connaissons aucune explication. Alors que faire? 
Eh bien il existe une solution inspirée par le spooling disque im- 
primante que nous avons vu dans le numéro 1. De plus, le transfert 
se fait indépendamment de l'unité centrale. 


2) Le transfert (de l'unité 9 vers l'unité 8) 


Taper OPEN 9,9,9,"d:nom,t,R" 
où t peut être S,U ou P (type du fichier à copier) 


puis OPEN 8,8,8,"d:nom,t.W" 
POKE 165,X: SYS A: POKE 165,Y: SYS À 


É Colas 


ERELX) 


avec X= 64+ numéro logique de départ (ici 73) 
Y= 96+ numéro logique de départ (ici 105) 
A= 61668 sur CBM 3000, 61695 en BASIC 4.0 


Ensuite: CMD 8: POKE 176,3: POKE 174,0 


Vous attendez que les disquettes s'arrêtent puis vous tapez 
OPEN 8,8,8: PRINT#8: CLOSE 8: OPEN 9,9,9: CLOSE 9 


C'est fini! 
Précautions 


Les instructions doivent être tapées en mode direct. Mais 
vous pouvez enregistrer un petit programme comme ci-dessous: 


10 OPEN 9,9,9,"0:COMALERRORS" 

11 REM 

12 REM 

15 OPEN 8,8,8," 1:COMALERRORS, S,W" 

16 REM 

17 REM 

2OPOKE 65:73 SYS 61695 POKE. 165105: :"SYS" 61695 
21 REM 

22 REM 

30 CMD 8 : POKE 176,3 : POKE 174,0 

31 REM 

32 REM 

40 OPEN-8,8,8 : PRINTÆ 8 : CLOSE-8.: OPEN 9,9,9.:- CLOSE 9 


Ensuite, pour chacune des lignes 10, 15, 20, 30 et 40 vous 
effacez le numéro des lignes, faites les corrections voulues (notam- 
ment les noms) puis RETURN. Les instructions REM sont là pour que le 
curseur se retrouve sur la bonne ligne après chaque instruction; 
pratique, n'est-ce pas ? 


Ne pas oublier après 30 d'attendre pour taper 40 que les 
disquettes se soient bien arrêtées. C'est pour cela que ce système 
ne fonctionne pas en mode programmé: il n'y aurait pas assez de 
délai. 


Pierre-Etienne THALBERG 


ne mr EP eme 


Si vous voulez avoir le son de cloche PROCEP, lisez 
le "BULLETIN PET/CBM" 


Renseignements : PROCEP 


19-21 rue Mathurin-Régnier 
75015 PARIS 
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Cahter Apecial CompatiDiEite 


ER RERRERRÉRRERERRRRRERERRRRRERESÉRRRLEEE E 


+ + 

- CORRESPONDANCE DES POINTS D'ENTREE + 

+ + 

— BASIC 1/ BASIC 2/7 BASIC A4 _ 

L à * 

RRERRERRRERERÉRRERERRERLRERRRELRLSELRLRRERRRREEERE EX 
* * KLnak * x * * 
CRETE ROLE RENE Es Ab NOR RS EP ROLE 4 
* * *X x * * * * 


RAR RAR IIRAIRRIRAARÉRE oo IH Hindi 


* C357 * C355 * B3CD * Inprime OUT OF MEMORY Ë 2 coU * D069 * C29 * Agente de 2 l'adresse de varia.* 
x * * 
* C3%9 * C357 * BXF * Envoie message d'erreur LAS 5 * DOSA * C2FA * Conversion réel-entier À 
* x 

% an * C389 * B3FF * Reset tiède * _* D278 * D26D * C4BC * Conversion entier-réel 4 
* x 

& “a * C38B * B41F * Insère une ligne après avoir *__* D679 * D67B * C8D7 * Prend un octet dans le registre X* 
À £ * transfommé les mts-clés F4 hatotat. anoitasnchegé sde msestes ee 4 

A érsosssnecr nb ose ed he RE -SHEte * _X D68D * D68F * C8EB * Evalue une chaîne 1 
& Et * C439 * B4AD * Refait le chainage et imprime SR RE Re M ATEN AA REA 4 
À x * READY *__X D6C4 * D6C6 * C921 * Prend deux paramètres 4 
x CEA * 
* C433 * C442 * B4B6 * Refait le chaînage * x D7X * D773 * COOD * Ajdition avec mémoire 4 
Mer À * 

* C48 * C495 * B4FB * Transfomme les mots-clés en code *  * D8FD * D934 * CBSE * Miltiplie par donnée en mémoire * 
kX x x 


ER 610 de vin n'es eine n'en ele ne tie eine 0e tie dés eine sos s sas en tte Dés e sise cms se c'ecasvcsceesessesassemesasesssesseccecocces 


eosesenecrreeeesecessesseeseesessseesseeeseseeseeesesese 


ssossseeseseseesesssesesessesesesesresseesessseecessseses 


ssssseseseseeseeessecseessveeseeseceseceesecessssecssecsse 


* 


* 

* 

* * 

* * 

* * 

*X * 
Mare ssessmesnesseccsosss dei. D PT de A2 ñ $ * tée par X,Y : 

* * 

* x 

* * 

* * 

* 

* 


a * BASIC 


vossesesereseseseecesscenscessssesssescesesesessessssecce 


c # x * AI 


* DAAO * DAE3 * CDOD * Copie ACC1 dans la mémoire poin- 


osserssssecesssesresecessrersessscessssescesesescens-s... 


* C59A * C5A7 * B622 * Remet Basic au début PRÈS: conan tentes gas dns concu 

Mi dornssones ssh ME. SL-Mien: MAR n re * DC9F * DCD9 * CF83 * Imprime un entier 

5 si CECA * B74A * Continue l'exécution de Basic RD 2 Los AUS SUD à DS AUTRES cos sac es d 
DNS ane sec ne ce sn ele ant Ne CU dS aU D en SEE + DAS * DCE3 * CFD * Imprire un réel * 

* T— * CO73:* BOFOr* bent AR Nombres ent eds CR SR se à % 
TE ne I te LR en US ni TT * DCE9 * CF93 * Convertit un nombre en chaîne  * 

> * CODE * BADB * Envoie CR, LF si mode écran * E * ASCII à 


Ed 
x 
* 


Pres eee ee ere enr en nero tee ee demie mie es pee voies or NN ES aies sers ss evs:dosie se Colfiois saisie paies nie es ses dec scesceccsces 


* C9p2 * C9E2 * BADF * Envoie CR, LF * _* ESEA * E3D8 * E202 * Imprime un caractère 4 
RER x 

* CA27 * CAÏC * BB1D * Imprime chaîne LS * E775 * D/22 * Sort un octet sous forme de deux * 
Adsense Vois iolus due donne tous aus CO NET SA HE Re x * * chiffres hexa (MM) _* 
* CA2D * CA22 * BB23 * [mprime chaîne calculée PR ects su martine es du Net TS < 
SE à sand A de M DT SR EE UE * E7A7 * D/54 * Entre 2 chiffres hexa en À (ii) * 
* CA7 * CAM3 * BB44 * Imprime !°?! RS RP PR en Ne * 
SE ER nn Ra * E7B6 * D763 * Entre 1 chiffre hexa en À (MM) * 
* CM9 * CMS * BB46 * Imprime un caractère RE ARC LE UT De Rae de Mesa ne ce 0 ST E 
nine soneoce se 080 eee nee 0 Tec 2e US * * E707 * F156 * F185 * Imprire un message système ë 
* CE11 * CDr8 * BEF5 * Teste si virgule ENS RS ER * 
nee dependent end ne ns * x F0B6 * FOB6 * FOD2 * Commande "parle" à l'IEFE *# 
* CE13 * CDFA * BEF7 * Teste caractère spécifié RE Sue aid de SE de SU Te AN PS SU LE  OSRE Le: 
nana eee se piennens tete alu CNE XX FOBA * F(BA * FOD5 * Commande ‘écoute à l'IFEE * 
* Fons * CEO3 * BF00 * Imprime SYNTAX ERROR PEUT RE RS Le 
Des iseussessseasenses nsc ad UOTE XX F12C * F128 * F143 * Envoie l'adresse secondaire 4 
* “a? C9 * C197 * Trouve variable réelle d'aprés 5. usine codes * 
4 # * son nom * * F167 * F16F * F1 * Envoie un caractère sur l'IFFE * 
* RTS * 


Dee 0 ete eve sec esectescretss see sessssecesvtenvsesere Less snssesesossssssssesssseseressesssseresscacssesstses: 


Le PAR] nr? 


x * * * *x 
SE ROLE à: 
x * * * * 


* F{7A * F17F * F1B6 * Commande fin d'émission("untalk") 
5 * 
* F17E * F183 * F1B9 * Commande fin d'écoute("unl isten" }* 
x x 
* F187 * F18C * F1C0 * Entrée depuis l'IEEE F 
* * 
* F2C8 * F2A9 * F2DD * Ferme un fichier logique a 
* * 
x F2CD * F2AE * F2E2 * Femme fichier de numéro logique * 
* * * *X en À * 
* oser erereeeeeeesreseeeeecececteseescesecesseeecece 23 
* F32A * F301 * F335 * Teste touche STOP À 
* * 
* +33F * F315 * F349 * Envoie message si en mode direct * 
L= F5 
Le * F322 * F356 * Routine LOAD (MLM) # 
* x 
* F30B * F3E6 * F425 * Imprime LOAD ERRR ‘à 
* x 
* F3E5 * F3EF * F42E * imprime READY et remet Basic au * 
* x * début * 
Æ sescveeeseseseeeceseceescececesesenesesereeeeseeseceececece x 
* FSFF * FA40A * F449 * imprime SEARCHING.. x 
* 
* F411 * F41D * F4 * imprime le nom de fichier ti 
* * 
* F4 Se * F447 * F486 * (btient les paramètres d'un char-* 
æ É * gent ou d'une sauvegarde É 
* *X 
x F462 * F466 * F4A5 * Ouvre un canal IEEE en sortie  * 
x * 


* F495 * F494 * F4D3 * Trouve l'en-tête voulue sur cas- * 
* *k * x sette 


esse sesceeeeseseecesesessececeseseesesesesseesesesee 


* F504 * FAFD * F5 * Cbtient une chaîne de caractères * 
* * 


sesvesecsesessceceeeesecesesesesceseesescesessececsesseesse 


* F52A * F521 * F560 * Ouvre un fichier logique d'après * 
5 < * les paramètres fourmis 


FD2D * F524 * F563 * Ouvre un fichier logique 


*X x 


eseseseessesesseeseseesesesescsesevcesesessecesseeececesesee 


x 
* 
SES * FS6E * F5AD * Imprime FILE NOT FOUND, supprime * 

# * Les E/S = 


sossereseeeresesssesesscsceseevreseeseceeseseseseesesecceve 


LA HE HP 2h ets 8 LE me 


seessesseceeseceeeseneseseseeeeescesecesesesesessesseses 


* F64D * F6 * F67B * Cbtient les pointeurs pour un 
à ë ci * chargement cassette 


sesecsesessescaceseseseesesscenresesesssecsseeeereesesess 


* * * * * 
* 1 40 ROLE e 
x * * * * 


és F667 * * F656 * F695 * Etablit l'adresse de départ du  * 
* tampon cassette 


ssssensseseeeeesseseseseseceesssecceesvereeceesssesesesees 


ES is * F66C * F64B * Etablit les pointeurs pour LS 
# Le * pon cassette 


* * 
* F6E6 * F6FO * F72F * Ferme un canal IEEE & 
* * 
* F788 * F770 * F7AF * Etablit le périphérique standard * 
PS = Fe * en entrée = fichier logique # 
* de 


essvesseeeeeeeessecerecesecseseesceccesseserecescessesses 


S ee * F7BC * F7DF * Etablit le périphérique standard * 


s di * en sortie = fichier logique : 
+ FEB * FOI2 * FA67 * Inprire PRESS PLAY et attend es à 
* FRE + FA3S * FE * “Teste l'interrupteur du magréto | : 
* F7F * FBS5 * FA * Lit cassette dans Le tanpon Dge : 
2 HAE ARE L'HOU TU cast dr Re lercne 


secosesserseeseceeceeeeseseseseesesesemeeesenseeceseeesse 


* 


* F8B9 * F886 * F8CB * Ecrit cassette à partir du tenpons 


sesscessesseesssesecesseesessseesescesereseeseesetcecses 


* tête en À 


eressssssssesesessessseseseesseeessesesesesssesesesesecese 


* 
* 


* F913 * F8E6 * F928 * Attend E/S terminée ou touche  * 
* x * * STOP * 
* sense semer eereeeeeeceecesece ou 
* FBDC * FB76 * FBBB * RAZ pointeur E/S cassette + 
x * 
* FD1B * FC * FCE6 * Etablit vecteur d'interruption * 
* * 
x FFC6 * FFC6 * FFC6 * Etablit périphérique d'entrée 7 

* 
x FFC9 * FFC9 * FFC9 * Etaæblit périphérique de sortie * 

* 
* FFCC * FFCC * FFCC * Restaure périphériques standards * 
* x 
* FFCF * FFCF * FFCF.* Lit un caractère 
* * 
* FFD2 * FFD2 * FFD2 * Sort un caractère * 

* 
* FFE4 * FFE4 * FFE4 * Saisit un caractère À 


Daniel-Jean DAVID 





£ MASTER 


LA BOITE AOÛTILS 
DES DEVELOPPEURS DE LOGICIELS 


Voici Master, un ensemble d’utilitaires spécialement 

créé pour Procep par la société française 

Micro-Applications. 

Maintenant, avec Master vous pouvez développer 

des logiciels professionnels de haut niveau 

sur le Système CBM 8001 de Commodore. 

Et à un prix micro ! 

Voyez vous-même : séquentiel indexé, générateur 

d'écran, multiprécision, compactage, décompactage, 

générateur d'édition, etc. 

Mieux : Master c’est aussi une clé électronique 

personnalisée qui vous permet de protéger vos logiciels. 

Votre investissement matière grise est sauvegardé 
des copies éventuelles. 


Master est le fruit de la politique de francisation 

que poursuit Procep, distributeur exclusif pour 

la France de Commodore. Avant Master, il y a eu Edex, 
développé pour Procep par la société française Eristel. 
Edex complète le Basic des Commodore de fonctions 
importantes telles que : swap, if then else, fetch, 
merge, print using, hard copy, etc. 

Master, Edex et les autres utilitaires Procep 

c’est la “Boîte à outils des développeurs de logiciels”. 
Celle qui est indispensable aux SSCI avec qui Procep 
ne cesse de renforcer sa collaboration. 

Venez voir Master au Sicob stand Procep - 3 C 3308. 
Procep est également présent à Sicob OEM 


et Sicob BOUTIQUE. 


Commodore. La micro-informatique pour les professionnels. 





SE RO EC, 


Cahier spécial compatibilité 


Nous 


(4000), 


Le BASIC 4.0 n'introduit que très 
rapport aux adresses stratégiques du BASIC 2.0 (C.B.M. 
les adresses 
adresses qui ne changent que pour le 80 colonnes: 
elles gardent leur emploi du C.B.M. 3000. 


ne citons 


LEE RÉEE 


+ 
L à 
L 1 
+ 
& 
* 


ici. que 


ADRESSES DU CBM 
SERIE 8000/4000 


ER RKEERELRREREREREERXEX 


L à 
+ 
Li: 
* 
Æ 
L 1 


peu de changements par 
série 3000). 
(80) signale les 
sur un 40 colonnes 
Il y a lieu quel- 


nouvelles. 


quefois de distinguer le 4000 grand écran (40 G) du petit écran (40 


Ps 


* explication S 
* x 


* Descripteur de l'indica- * 
* teur d'état-disque DS$(80)* 
5,2 


ssssssceesseeerceserecessercsesesesesecesesecsseeesesesereecse 


(80)* 
*x 


soscesecesseseseeseensseeseseesseeseseesseseseseescssecesse 


* tition (80)* 


ssseresesesseeesecsesessesecesseesseccesesesesesecsesesee 


* tion (80)* 
x 


sssesecseseceseseesssesesecesseeesesesececeseesessecesesse 


sssecoceneceseerecereseeesesecseseescesseesesesecesecesesecss 


* che (80}* 


ssseceresscseressceseseesessecesecseecesesesesesceosessecvess 


* 
hex “ dec 
LS 
000D-000F * 13-15 
* 
00E0-00E1 * 224-225 
(ER 226 
72 
00E3  * 227 
* 
O0ETS 228 
* 
O0E5  * 229 
* 
O0E6:. * 230 
+ 
QDEZ + 231 
00E8  * 232 
* 


* touche HOME 


sosesosesseresesecssecessscescesvceseseseseceseesessecesevesse 


LP nt 


* * * 
nex & dec ik explication 
* * * 


00E9-00EA * 233-234 * Vecteur d'entrée (80j* 
* 
O0EB-00EC * 235-236 * Vecteur de sortie (80)* 
x 
LR RS A I OC OU - 
UTILISATION DU TAMPON DE LA SECONDE CASSETTE * 
+ 
0334  * 826 * Pointeur caractère pour le 
* SE D: 

See D a 
eu S D RS Te) 
b. 535 Sn CC 
eo * d'écriture _ 
San RE 
Nesle Re Ë 
RASE PET Éd na NME 
Ps : la chaîne de comen pass 

a *]e S.E.D. 

ZS 








* * * * 
ETEX F dec ë explication É 
* * *k * 


* 0342-0352 * 834-850 * Tampon pour nom de fichier* 
* eeseseeeeeresecesseeeeeeseeeeeeeeeeereseceeeeseeeeeeeees * 
* 0353-0380 *  &51-8%  * Tampon pour la chaîne de * 
3 # * commande à 
* serres eeeeseeeeeeseeeeseeseeeeeeeeneeeeeececesece n° 
* 0381-03ED * 897-1005 * Libre (seconde cassette) * 
* * * 80, 4@P)* 
x 000000000000 00000000000000e000060000000000000000e x 
* 0381-038 * 897-1000 * Libre (40 G)* 
* seen seeeeeeeeceeereeseseeee000ee000e00eece x 
MERE 1001  * compteur pour touche répé-* 
Fe x * tée (40 G)* 
x Sereseseseseeeseseseceeeeeeeseseceereseceeeeeeeereenmece * 
Ke USEA ä 1002  * délai pour répétition 40 & 
* LS * * 
Ms Ta ann e Pare rat nie ete so late ta a UNINANS lee ni le ae ie ete an ets sois le lo ate IST a 2e ne x 
Æ "03EB 1003 * Limite du tampon clavier * 
x * * : (40 G)* 
* eeseseeereeseeeceeecseseseseseeeeeeeeceseeeeseeseecesecece * 
Sem OSEC # 1004  * Période de la sonnerie  * 
* * k (40 G)* 
æ 000000000000 000000006000e00e00e00..0e * 
ke OSED ii 1005  * Compteur 50 H (40 G}* 
x 000060000000 0000000000000000000000000000000%00000e x 
dico r0SEE # 1006  * Indicateur de répétition * 
* * * (40 G)* 
* x 






HAE 


Er NO A He ED OU 20 0 SEE AE D 


INFORMATIQUE e ÉLECTRONIQUE e AUTOMATISME e MICROPROCESSEUR 


LIBRAIRIE LA NACELLE 


TOUS OUVRAGES ET ABONNEMENTS 
FRANÇAIS ET ETRANGERS 


Tous les ouvrages français ou étrangers signalés dans cette revue peuvent être obtenus ou commandés à La Nacelle 


2, rue Campagne-Première 75014 PARIS - Tél. 322 56 46 


Métro Raspail - Parking à la hauteur du 120 bd du Montparnasse 
ouvert tous les jours lundi compris, sans interruption de 9 h 30 à18 h 50, samedi fermeture à 17 h 50. 


* * * 
hex Gi dec : explication * 
* * * 


OSEF Æ 1007  * Masque pour tabulation  * 

* * (40 G)* 

esse eseceseeeeeeeeessreceeseceeeesevcecreveseeceee x 
03F0-03F9 * 1008-1017 * Taquets de tabulation 4 
* * (40 G)* 

ses erenmeeeeeseeereseeeeeeeeeeseeeeseeeseeece * 
O3EE-03F7 * 1006-1015 * Table des taquets de tabu-* 
D * ]ation (80)* 

* 

03F8-03F9 * 1016-1017 * Libre (80, 40 P}* 
'ogFLogs +" 1018-1019 * Vecteur d'extension du m-* 
de * niteur 1 
nsc eeseseeeesessecereeeeeeeeeeeeresesces x 
O3FC es * Time-out pour l'IEEE 4 

* 

O3FD-03FF * 1021-1023 * Libre 4 
* 

8000-87FF * 32768-34815 * MEV d'écran (80)* 
k 

8000-83FF * 32768-33791 * MEV d'écran (40)* 
x 

B000-BFFF * 45056-49151 * MEM supplémentaire système* 
LS 

E880-E881 * 59520-59521 * Boîtier contrôleur d'écran* 
é * (6845) (80)+ 

* 


esesesesssseseeesescesescecesesesesereseseeeceescceccsecesces 


Daniel-Jean DAVID 





Se CRT n'? 


LR RERÉELRERRERLRE 


# # 
a BIBLIOGRAPHIE = 
* * 


LL RREREREREREREREEX 


Nous donnons ci-dessous la liste des livres susceptibles 
d'intéresser les possesseurs de P.E.T./CBM, 


En anglais: 
Butterfield CBM ROMsS disassembled 


Osborne-Donahue The PET/CBM computer guide 
Osborne Mc Graw Hill 


Fisher-Jensen PET and the IEEE bus 
Osborne Mc Graw Hill 


N. Hampshire The PET revealed 
Computabits 


Leventhal 6502 Assembly language programming 
Osborne Mc Graw Hill 


En français: 


David La découverte du PET/CBM 
PSI 

David La pratique du PET/CBM vol I (fichiers) 

vol II (assembleur) 

PSI 

Michel Programmes internes du CBM 
BCM 

PROCEP Manuel d'utilisation du CBM 8001 
Editions Radio 

Zaks Programmation du 6502 
Sybex 

Zaks Applications du 6502 
Sybex 


Appel aux lecteurs 


Un nombre non négligeable des ouvrages précédents ayant été 
écrits ou traduits par notre directeur de la publication, nous ne 
pouvons en faire la critique. En revanche, nous serions reconnais- 
sants à tout lecteur qui voudrait bien nous envoyer pour publica- 
tion, une critique ou un compte-rendu de lecture d'un de ces livres. 


La Rédaction 


RE 


LIL TR RT se 











A 


"Manuel d'utilisation du CBM 8001" 


auteur : PROCEP 
coédition : PROCEP et Editions RADIO 


Depuis le SICOB 81, les utilisateurs de CBM 8000 disposent 
enfin d'un manuel de référence en français digne du matériel. Il 
s'agit d'un livre véritable, de 320 pages, bien imprimé en photocom- 
position et non plus en frappe machine-à-écrire artisanale, et bien 
illustré (34 figures, dont beaucoup sont des photos et 15 tableaux). 


Au point de vue fond, il regroupe en un seul volume, ce 
qui est plus pratique, les informations qui étaient données par les 
brochures séparées de PROCEP: Manuel d'utilisation du 8032, Le BASIC 
du PET/CBM, Les entrées sorties du PET/CBM, Manuel de l'utilisation 
de l'unité de disques 8050, notice d'EDEX, mais chacun de ces textes 
a été consciencieusement révisé, complété et actualisé, l'ordre de 
là présentation a été soigneusement réfléchi et des compléments 
d'informations ont été ajoutés pour servir de lien entre les chapi- 
tres. On aboutit à une organisation extrêmement rationnelle de l'ou- 
vrage articulé en quatre parties: 


1- Familiarisation avec le système (les éléments du système, 
le clavier) 


2- Utilisation de l'unité centrale (l'éditeur d'écran, BASIC 
et EDEX) 


3- Entrées sorties et périphériques (dont le chapitre sur 
l'IEEE a été entièrement réécrit et a des routines de gestion de 
l'IEEE en langage machine) 

4- Les unités de disques CBM 8050 

Des annexes extrêmement bien faites le complètent: 
1- Le clavier AZERTY 
2- Résumé des commandes BASIC 


3- Carte d'implantation mémoire avec adresses stratégiques du 
système (page zéro) et adresses des routines-système 


4- Moniteur langage machine (avec tableau du jeu d'instructions 
du 6502) 


5- Messages d'erreur (avec pour chaque erreur un petit listing 
montrant un exemple de production de l'erreur). 


6- La disquette de démonstration 
7- Formats disques 8050 
8- Correspondance des commandes en BASIC 4.0 ET BASIC 3.0 


"TA RS: 7-2 


9- Les codes internes 
10- Petit lexique 
11- Bibliographie 
Enfin les recherches sont facilitées par la présence d'un index. 
Le livre se borne à des généralités concernant les impri- 
mantes, renvoyant au manuel spécifique de l'imprimante concernée 
pour les détails. Ceci est légitime vu la diversité des imprimantes 
connectables. 
Conclusion 
Par la qualité de sa présentation et l'importance des in- 
formations de référence qu'il renferme, le livre est indispensable 
aux possesseurs de CBM 8000. La version pour CBM 4000 est en prépa- 
ration. 


Nous décernons à cet ouvrage le label "Approved by La 
Commode" . 





“Programmes internes du PET/CBM" 


auteur : Benoit MICHEL 
éditeur : BCM, 24 rue de la Sapinière, 4960 BANNEUX Belgique 


Si nous, français, avons un petit peu tendance à nous 
moquer -amicalement- de nos voisins d'Outre Quiévrain, voici un 
livre qui pourra nous rabattre notre caquet ! Jugez plutot. 


Il contient -sur 135 pages- le désassemblage complet et 
commenté en français des MEM du CBM (3000). 


Mais ce n'est pas tout : il contient ensuite la liste des 
principales routines du système avec adresse d'entrée, explication 
des registres à positionner et conseils d'utilisation. Il donne 
ensuite certaines explications et conseils sur les périphériques et 
enfin un recueil de montages hardware et de trucs software très 
utiles (ex. comment mettre le curseur où on veut, comment faire un 
clavier à répétition etc...). 


Notez que La Commode et BCM ont conclu un accord d'échange 
1 réciproque d'informations qui ne pourra que bénéficier à nos lec- 
teurs respectifs. 


Conclusion 


Voici donc un livre tout à fait indispensable pour le 
CBMiste qui veut "aller plus loin" et exploiter au mieux son sys- 
tème. Le seul regret que nous formulons est que ce livre ne s'ap- 
plique qu'au CBM 3000. Nous attendons avec impatience la version 
4000/8000. On a lu aussi avec agacement le terme ‘“socquet" pour 
support de circuit intégré (2???). 


Pierre-Etienne THALBERG 
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Le bus IEEE-488 est le principal moyen 
d'entrées/sorties des Commodore et à ce titre il 
est nécessaire de faire le point. Cette série 
d'articles se propose de donner toute la lumière 
sur cette interface. 


Un bus se compose de trois éléments 
essentiels: 


- des lignes d'adresse 
- des lignes de données 
- des lignes de contrôle 


Les données sont l'information trans- 
mise, l'adresse nous donne l'endroit, le contro- 
le nous dit : quand (synchronisation), le type 
d'opération (le sens, lecture ou écriture), le 
type d'information transmise. 


Le bus IEEE comporte 16 lignes: 


- 8 de données DI01 à DI08 
- 8 de contrôle: DAV, NRFD, NDAC, ATN, SRQ, 
IFC, REN, EOI s 


Ce qui veut dire qu'adresses et don- 
nées sont multiplexées sur les lignes DIO1 à 
DI08. 

Le dialogue peut aisément se comparer 
à une table ronde : un président de séance (le 
contrôleur) va donner la parole à une seule per- 
sonne (un parleur, "Talker"') et dire qui va 
écouter (écouteur, "Listener"). 


: La transmission des données ou des 
ordres se fera par trois lignes: DAV, NRFD, 
NDAC. 


- DAV (data valid): une donnée ou un ordre se 
trouve sur le bus 

- NRFD (not ready for data): je ne suis pas 
prêt à recevoir 

- NDAC (not data accepted): l'information 
n'est pas encore acceptée. 


Pour transmettre, le contrôleur ou le 
parleur examine la ligne NRFD. Si elle est à 
"zéro", cela signifie qu'au moins un des élé- 
ments du bus n'est pas prêt. Si elle est à "un", 
tous les éléments sont prêts. Le contrôleur ou 
le parleur positionne à ce moment les données et 
DAV pour indiquer que quelque chose se trouve 
sur le bus. Les écouteurs répondent par NRFD=0 
et NDAC=0. NDAC va rester à 0 le temps de mémo- 
riser l'information du bus. Lorsque la ligne 
NDAC va revenir à 1 (tous les écouteurs ont pris 
les données), le controleur ou le parleur va 
mettre DAV à 1, préparer les données suivantes 
et attendre NRFD=1. 


Ceci est très puissant et permet d'en- 
voyer de l'information à deux éléments ayant des 
vitesses très différentes. 


Pour assurer ceci les lignes du bus 
sont à collecteur ouvert et en logique négative. 


: LE BUS 
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- pour transmettre les ordres (qui parle et 
qui écoute) le contrôleur et lui seul peut met- 
tre à zéro la ligne ATN (attention j'émets une 
commande ). 


- SRQ (service request) est une demande de 
service d'un élément du bus vers le contrôleur. 
Ce n'est pas une interruption; si on reprend 
l'image de la table ronde, cela correspond à un 
participant qui lève la main et attend que le 
président de séance lui donne la parole. 


- IFC (interface clear) est un reset général 
du bus, tous les appareils sont désactivés et en 
attente. 


- REN (remote enable) permet de désactiver un 
appareil: un membre de la table ronde quitte la 
séance. Dans les CBM cette ligne est toujours 
active (à la masse) et ne permet pas d'utiliser 
cette fonction. 


- EOÏ (end or identify) est utilisé pour in- 
diquer la fin d'une transmission. Lors du trans- 
fert du dernier octet, si cette ligne est à zéro 
alors le ou les écouteurs sont avertis de la fin 
de transmission. Ceci n'est pas toujours respec- 
té et on utilise souvent le caractère "“retour- 
chariot" (0D en hexadécimal) pour indiquer une 
fin de transmission. 


Après cette description générale, vo- 
yons les problèmes posés par les CBM. Le princi- 
pal est celui de la ligne SRQ qui n'est pas géré 
par le moniteur, mais heureusement accessible à 
l'utilisateur. D'autre part le BASIC est lent 
(de 100 à 500 octets par seconde) alors que le 
6502 permet d'atteindre 5000 octets par seconde 
sur l'IEEE mais en langage machine. 


Dans les prochains articles nous ver- 
rons comment utiliser la ligne SRQ, les sous- 
programmes du moniteur, la programmation presque 
complète de l'IEEE en langage machine. D'autre 
part un certain nombre d'interfaces relativement 
simples seront décrites. 


À suivre ... 


Jean-Luc DESCHAMPS 
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Les jeux cousus-main 


RRRRERERERERE 





æ = 
= TENNIS æ 
+ # 


RER RERÉ 


Avec le programme qui suit, vous ne jouez pas contre l'or- 
dinateur, mais contre un adversaire. L'ordinateur arbitre et compte 
les scores. 


Il s'agit d'une simulation très rudimentaire du jeu de Ten- 
nis: la balle ne se déplace que le long d'une droite; donc il n'y a 
pas d'effet d'angles ou d'inclinaison de la raquette. 


Votre camp est symbolisé par deux barres verticales. Si la 
balle arrive à traverser votre camp, vous avez perdu. Vous devez 
renvoyer la balle avant en appuyant sur la touche Q ou / selon que 
vous êtes à gauche ou à droite. Plus tôt vous appuyez, plus vite la 
balle sera renvoyée et donc plus difficile elle sera pour votre ad- 
versaire, mais attention, si vous appuyez avant que la balle ne soit 
entrée dans votre camp, cela donne un point à l'adversaire. 


Les scores ne sont pas limités, pour vous permettre de simu- 
ler soit le tennis soit le ping-pong. Le score du joueur qui mène 
est souligné. Celui du dernier qui vient de marquer est en contraste 
inversé. 


Pour démarrer, vous faites SHIFT, ce qui fait apparaître 
les camps. Ensuite, le service se fait en appuyant sur SHIFT: à ce 
moment, la balle part du milieu, dans une direction aléatoire. 





Le sous-programme en 300 donne un effet sonore mais pour un 
branchement non classique du haut-parleur. Pour s'adapter au bran- 
chement décrit dans le numéro 1, il faut écrire: 


300 POKE 59464,100 : POKE 59466,15 : POKE 59467,16 
310 FOR I=1 TO 10 : NEXT : POKE 59467,0 : RETURN 


Daniel-Jean DAVID 
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PRINT" RBRBRBBBBEÆERTENNISÆREENOULE JOUEUR DE GAUCHE JOUE AVEC LA TOUCHE 8" 
: PRINT'S8LE JOUEUR DE DROITE JOUE fNEC LA TOUCHE 4'Æ 
"LE SERVICE SE FAIT AVEC © : É 
BE INT" MF LUS TüT VOUS APFUVEZ GUAHD LA HALLE EST ENTREE DAHS VOTRE CAMP 
T'ELUS ‘FORT’ LA BALLE EST RENVOYEE" : de - 
ENT MAS SI VOUS AFFUYEZ TEOP TOT. CELA DOHHE UH POINT A L'ADYERSAIRE! 
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5 FPRINT'APOURE ARRETER FAIRE STOF LA EALLE ETAT WISIBLE €SHIFT SI HECESSAIRE 
3 PRINT'ABFRIRE SHIFT FGUE DEMARRER" :MAITISE. 1 

19 SG=0: 500: GE" M: DEAN PEUR SES nt j=4 : Tu 

DA PRIAT ONE: GE: SC FE: FPRINTSFCISS 5: MTS ET FETES: TG 

ES Re Se a 

26 IFSIGSOTHENFEIHTTAEE SSI: E ZE " à 
5 ER LATIN" GOSUE DO: GOSUESEE : PRINT" GOSUESOG : GOSUBEGE : FRIHTUTTTI 
ei MAITISE, 1 ie du dé ie 

+8 Face: FRINTTABREE- 1 13 Mas POREISS. 6 
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CONFERENCE DE M. DANIEL-JEAN DAVID 


ERLERRERERLEREREERRÉLERELERELRLREERRELRLERRKRRRKKELE 


Le lundi 22 février 1982 à 19 h, organisée par l'AFIN 
(Association française des Informaticiens), se tiendra une confé- 
rence de Daniel-Jean DAVID sur le thème "Les langages de la Micro- 
informatique", thème dont D-J DAVID est un spécialiste reconnu et 
sur lequel il à écrit de nombreux ouvrages. 


La conférence aura lieu à la salle des Arts at Métiers 
(salle La Rochefoucauld, rez de chaussée) 
9 bis av. d'Iéna PARIS 16. 


La conférence sera assortie de démonstration sur CBM 
9000 MICROMAINFRAME. 


Participation aux frais Membres de L'AFIN : 50 F 
non Membres 2 S06E 


Renseignements et inscriptions d'avance 
Madame DEVAUX AFIN 54 rue St Lazare 
75009 PARIS tél 874 38 03 
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Les jeux cousus-main 
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Dans le premier numéro, nous vous avons présenté le Jeu du Pendu 
grâce auquel vous avez pu "conforter" vos connaissances en matière de 
vocabulaire. 


En guise de récréation, c'est un jeu faisant appel à la rapidité de 


vos réflexes et à votre habileté, le Tir à la Cible, dont vous trouverez 
le "listing" dans les pages qui suivent. 


Rappelons que les touches "curseur" sont indiquées en clair et entre 
crochets. Le "crochet ouvert!" est précédé d'un espace et le "crochet 
fermé" est suivi d'un espace dont il n'y a pas lieu de tenir compte lors 
de la frappe du programme. Par contre, tous les autres espaces situés 
entre guillements dans les instructions PRINT doivent être scrupuleusement 
tapés au clavier. 


Ce programme fonctionne parfaitement sur P.E.T. 2001 ainsi que sur 
les CBM des séries 30C0 et 4000. Bien qu'écrit entièrement en Basic, son 
exécution est suffisamment rapide: ce n'est pas aussi facile que cela de 
gagner !!1! 


Comme vous pourrez le constater, ce programme utilise largement les 
signes semi-graphiques à travers les instructions PEEK et POKE. Voici les 
principales routines du Tir à la Cible. 

Lignes 1021 à 1026: nombre de joueurs (1 à 9) et degré de difficulté pour 
chaque joueur (1 à 9 également). 

Lignes 1001 et 1012: changement du degré de difficulté. 

Lignes 1200 à 1250: nom de chaque joueur. | 


Lignes 41 et 12: test de la touche RETURN. 

Lignes 100 à 140: déplacement de la balle et de la cible, la ligne 120 
acceptant les touches N , Met ! (! pour le joueur 
qui abandonne ...) qui sont testées en lignes 5C0 à 
520: 

Lignes 600 à 725: Affichage des signes graphiques correspondant aux 
touches M et N . 

Lignes 810 à 844: Affichage du score réalisé. 

Lignes 300 à 315: Rebcnd de la balle. 


Quand vous vous serez familiarisé avec l'utilisation des PEEK et des 
PCKE dans ce jeu, vous pourrez à votre tour vous inspirer de ces routires 
pour la création de jeux d'adresse de votre cru. 


Amusez-vous bien ... 


Jacques COUTHURES 
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EF = Er EE 
PAGE 
REM  ADAPTATION J.C. 
PK = 1: DIN NA£92,PN#E95,PSX699 , PME 
PRINT " [CLR] CRVS] TIR A LA CIBLE" 
PRINT " COOWNI COOUN] ESSAYEZ DE TOUCHER LA CIBLE : ©" 
PRINT "EN APPUVANT SUR CRYSI HN COFFI OÙ  CRYSI M COFFI 
PRINT “ COOUN] NOMBRE DE JOUEURS (1-95? "3: GOSUE 1421:P% 
PRINT " COOUN] CRVS] FAIRE RETURN APRES CHAQUE HOM": 
GOSUR 114 
PRINT : PRINT : PRINT TABE 32" CRYS] FAIRE RETUEN POU 
R COMMENCER" 
GET A$: IF A$ = CHR$ “13 THEN 42 
IF A$ = "R" THEN 28 
GÜTO 4 
PL = PL + 1: IF PL > Pv THEN FL = 1 
E$ = " CFVS] "iv 
= “ COOMNJ COOWNI COOWNJ COOMMI COOWNI  COCWNI 
COOUNI COOUNJ COOMNI COOUNI COOWNI  CDOWNI 
COOUNI COOMNI COOUNI COOMNI COOWNI  COOWNI 
COOUNI COOMHI COOMMI COOMNI COOWNI " 
TS = TI:PC = 1:PK = 32268:0 = 1 
PRINT " [CLR] "B$" CHOMEJ CPS] JOUEUR"PL" = " 
LEFTS CPN#EPLD,189 SPC£ 125; 
FOR 1 = 1 TO 22: PRINT " CRVS] CRIGHTI CRIGHTI 
CRIGHTI CRIGHTI CRIGHTI CRIGHTI CRIGHTI CRIGHTI 
CRIGHTI CRIGHTI CRIGHTJI CRIGHTI CRIGHTI LRIGHTI 
CRIGHTI CRIGHTZ CRIGHTI CRIGHTI CRIGHTI CRIGHTI 
CRIGHTIJ CRIGHTI CRIGHTI CRIGHTI CRIGHTI CRIGHTI 
CRIGHTJ CRIGHTI CRIGHTI CRIGHTI CRIGHTI CRIGHTI 
CRIGHTI CRIGHTI CRIGHTI CRIGHTI CRIGHTI CRIGHTI 
HENT : PRINT " [RS] DIFFICULTE = " 
PRINT €2@ — NX£PL)> 2" [LEFTI " LEFTS cE$,4; 
T = INT € END £12 # GD@ + 327685: IF €R3248 € To AND CT 
£ 33288 THEH 80 
TD = iiHN = H#iPL) 
IF PEEK (T> € 3 32 THEN 89 
POLE T.87 
FEM 
FÜR II = 1 TO NN: IF PEEK £PE> = 81 THEN POFE PE,22 
PE = PK: GET I$: IF 1$ € > "" THEN Sam 
IF PEEK (PK + D € 3 32 THEN 34 
PK = PK + OC: POKE PK,Rl: NEXT : POKE T,32:T = T + TO # D 
IF PEEK {T>< 3 32 THEN TD = = TOsT = T + TD * D 
POKE T.87: GOTO 14 
IF FEEK PK + D) = 78 THEN PK = PK + O:D = D — SON € 
+ 41: GOTO 1848 
IF PEEK PK + D) = 77 THEN PK = PK + D:D = SON €0ù % dc 
ABS €D> AND 12 % 49 + £ ABS <O> AND 48) / 4m: GOTO 9 
9 
D= - D: IF PEEK «PK - Do = &7 THEN 8a@ 
GOTO 14%: FEM THOIRECT HIT#T 
IF I$ = "HN" THEN 6%@ 
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GS IF 1$ = "M" THEN F6 
1 IF I$ = "Ii" THEN FPS = G: GOTO S1 
2A GOTO 125 
an Q = D:PC = PC + 1: FÜKE PK.7S 
as D = D - SGH €CD: *# 41: GOTO 168 
AS IF PEEK «PK + Où = ÿS THEN PK = FHPNT 
ag Q = O:PC = PC + 1: POFE PK.Fr 
PAS IF OO = - 1 THEN D = - 4ñ: REM LES 
14 IF © = 4 THEH D = 1 
F1 IF QG = 1 THEN D = 48 
Po IF Q = - dé THEN Di=t — 1 
Fes GOTO 166 
An PS = 1am@ — 12 # PC — 12 — INT CETINE TS PRENTMIF PS & 
à THEH PS = 1 
SHePLli = PS 
= INT céPHÉéPL) à CPK — 16H PSI Pas 


FRS EE 
PRIHT " CCLRJI COCWUN] CFIGHT] CRIGHTI CRIGHTI CREYSI r 


0 0 1 
Pi ts ta 
Po mi 


5 À 

22 PRINT " CRIGHTI ECRIGHTI CRIGHTJ CRYSI | JOUEUR 1 OI 
F- L'SCOREMINMAN UNE 

2>S PRINT “ CBIGHTI. CRIGHTI  ERIGHTI ERNST Et 


+ 
22e PRINT " CRIGHTI CRIGHTI CRIGHT] CRVS] | COFF] 
| ] | Ha) 1e 
38 FOR I = 1 TO FY 
232 PRINT " CRIGHTI CRIGHTJ CRIGHTI CRYSI | COFFJ "PN$1 
LD = MB 7 2M ao) "ESAUTID TAB 295" | "PMACID TABÉ 372 
# (E EU 1 | LL 
4 NET 
S PRINT " CRIGHTI CRIGHTI CRIGHT] CRYSI] | COFFI 
l | | LEVSURIE 
28 PRINT " CRIGHTI CRIGHTJI CRIGHT] CVS ——" — 
si ———tîû———— COFFI 
c4n PRINT SGPCL 1m2" CRYSI] C'EST LE JEU HUMERO"PE 
S44 PRINT " CHOMEI “z:: FOR EK = 1 TO 4 + Pl: PRINT “ COOWNI 
ss HEXT : PRIHT " CRIGHTI CRIGHTI CRIGHTI CRIGHTI #" 
: FOR KE = PL TO Frs PRINT " COOWHI " 
sS@ IF FL = Fr THEN GOSUB 98: FOR I = 1 TO PY:PSACID = fe 
HEXT :P*X = PK + 1: GÜTO 38 
Sea FRINT “ COOMNI COOWHJ  COOHHI] COOWHI] " SP 
AIFE RETURN POUR CONTINUER": GOTO 48 
aa PRINT " COOUHI COCGWHI  COCHH] COQUHI " SPCE 4" CRYSI 0 
H CHANGE LA DCIFFICULTE ? £O0-H3? COFFI “ss GOISUR 1411 
A IF A$ = "H" THEN  FETUFH 
4 PRINT " CCLEJ COOWN]  CO0WHI COGQUW] POUR QUEL JOLIELIF 7 
nes GOSUR 1A21iRk = sr IF & 3 Py THEH 92 
929 A+ = FH#SKREI SAN = 18 
33 IF MID CAE. AH. 1 
GATE 934 
a3z A$ = LEFTS CASA + Ms "5 PEIHT " COOWNJ COCHNI "A#"LA 
DIFFICULTE EST DE"S2N —- HAE À £ 
34 PRINT SPC LENW €A#52"5SH HOVENHE EST PME ES 0 
36 PRINT SPC LEN <A#52"SOH DERNIER SCORE ETAIT'PSALRE 
4% PEINT " COCUHH] HOLYELLE CIFFICULTE 21-927 "sr: GOSUR 1821: 
LE LRETEES En — KA *# à 


24 PRINT : PRINT " COCHHI] OH CHANGE POUR UH AUTRE SOHo% Mes 


Croate CRYET À 





" " AND AR > 1 THEN A4 = AK — 1: 
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GOSLE 

FETLF 
FOR 
HET 
FOR 
HET 
NE 
FEIH 
FOF: 
HEXT 
FÜR 
HEXT 


DEPÉANERNETELRE 


PABES NA 
1911: IF À$ = "Q" THEN 92% 
H 
Ie EC POTTIONS SET Ya EAST TE MU THEN 1605 
ORPI CREMST FÉERTI-\: 
I = 1 TO 1960: GET Af: IF A$ € 5°" THEN: 1085 
2 PRINT OM COFF TI ELERTI OMS CARE R 
MAL CH) = & THEH 15541 


T "-COFFJ "AS:S = VAL CAS): RETUPH 

Le TL FO TRS CET AE RRRR FE 27 MN THEN 1ntS 
: PRINT " CRYS] CUS EI MRRRE 

LRO OBS GET AFS IP AS CU ME TEENS TRES 
sr DR RS TRIER" CÉERMI GRO TATI 


IF AS KT 5 SO"SAND: AFS, SPP LNIPTTHENMIGIA 
FRTAT !EOFF I) "ASE TRETURN 


FOR 
HEXT 
FOR 

HEXT 


LOTERIE DETS AESMIE ARC PISE THEN TES 
s PRINT " CRYS]J CÉERNISUE 

l'=c1 TROMBGGICRETUAPT TPAAREAIS CTAMIMHENCTHESS 
RAARUERE ST TERE CÉERTI "se GTA 


IF A$ °C A" OR AS I>O MON THENN1EZ AT 


PRIH 
PRIH 


? 


T " COFFI "A#s:R = VAL CAfo: RETURN 
T " COCUNI "s FOR K = 1 TO Pre PEIHT "NOM OÙ JOUEUR"K 
ÉLEPANSEMELERMIPENELEEMMMRELERT]I ELERFI 


JCCEF FI" ÉCERIT ELERMTI CÉERMIN 7 
GOSLUE 1254 


CPE 


PRINT : PRINT "OIFFICULTE DE JEU POUR LE JOUEUR"K"É1-99? 
Cd 

GÜSUE 1A21:NkEK) = 24 —- 2 % K 

HEXT : RETURN 
[SE = ut 

FÜR" JT'= 1" 10 SG: GEAR: IFR AS  <ETSNPL I THENHA??28 

HEST Er PRIMO" CRYSI ELEFTI eu FORSNIS=11 TO SO: GET À$ 
IFRS LR THEN 1220 

MENT 8 PRENT M EOFE I ELEFTI se GOTO 1200 
A = ASC Atos IF À = 13 THEN PRINT " LCOFFJ) _": GOTO 125@ 
IF À = 24 AND  LEH ÉB$5 35 1 THEN R$ = LEFTS £B+$, LEN “B$# 
LD PRIME EDRFINEL CUERTIR) LLEPMMITANTÉEFRTFITU EE 
GOTO 12164 

IF À = 26 AND LEN £B$5 = 1 THEN B$ = "": PRINT " COFFJ _ 
ÉREF FPT TER TIN 2 CERTAINS SRETO 1718 

IF À = 32 OR é64 € À RAHD À € 98) THEN PRINT " COFF] "A$: 
E$ = B$ + A$: IF LEN £5E#$ > 9 THEN 1259 

GOTO 1214 
B$ = R$ + " MIPNSLKI SSICEFTE TRS. TAUPE HUMAN 
FETLUREH 


EtJ0 
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Ü 601062: (C) OLIVIER BARTHELEMY 1981 

1 IFXEUTHENX=X-1-INT(X) RETURN 

2 X=X-INTOX) RETURN 

3 DXSCAÏHTEGIN(J)-J)/(i-CHCO06(J)) :IFSTRSJHDX) CRSTRSCJ)THENJ=J+DX:60T03 
4 IF(I+1)/(i-1) OTHEMRUN 

5 VX=2*6TNCSGRC({41)/C1-T) )#TANCI/2)) RETURN 

& X=2/4/2:GO0SUB1 :X=0+X#0#2:GOSUR7:GOSUR29 :RETURN 

7 X=X/2/0:60SUR1:X=X4360: IFXOTHENX=X+360 

8 RETURN 

9 Z=ATN(Y/X) :1FXOTHENZ=Z+0 

10 RETURN 

1 GOSUR97:XU=GGNEX) : IFX=10RX=-) THENX=X 0/23 RETURN 

12 X=ATN(ABS(X)/G0RCI-X#X) )#SGNCXO) : RETURN 

14 GOSUR97:XU=SGNIX) : IFX=OTHENX=0/2:RETURN 

15 X=ATH(SOR(1-X#X)/ABSUX)) : IFXU<OTHENX=U-X 

jé RETURN 

17 XU=INT(X)X3=(X-X0) #60 XI TNT (XI) KA INT((XI-X1)#604.5) RETURN 

18 FRINFXO"D"X1"O" "3 :RETURH 

19 PRINTXO"H"XL "M": RETURA 

21 XI=INT(X):X2= (XXL) #6: XI=XI+INT(X2)/60:X=X1+(X2-INT(X2) )/360RETURN 
22 GOSUB34:PRINT"SHeure du Lever =": 

23 GOSURAU: PRINT: X=(AL+5A-M)xH:PRINT"HPascege au Meridien =";:gosuh30:print 

4 X=(ALHX6+63-A) HS PRINT'EHeure du Coucher =";‘gosub30:print:gosub37:return 

5 FRINT:HA=(HZ#1.003+4-63-AL)/12#0:Y=SINÇ(HA):X=COSCHA)#SIN(GI )-TAN(DH)*CO5 (61) 
& GOSUB9: PRINT 'HAzimut ="s:gosuhétx=sintgl)#sin(de)+cos(gl)*cos(du)#cos(ha) 

7 PRINT" *# HAUTEUR ="; :60SUB11:G0SUR7: IFX>180THENX=X-360 

29 GOSUAL7:GOSURIBIRETURN 

30 IFXÉOTHENX=X+24:60T030 

31 {FX>24THENX=X-24:G0T031 

32 IFN=OTHENGOSUR1 7: GOSUR19 

33 RETURN 

34 H=,99727:X=(SIN(HA)-SIN(GI)*SIN(DL))/C08(61)/COS (DL) :6OSURI4 

35 AH=X:X6=X/0#12:X=(AL-X6+63-N)#H:RETURN 

36 T=(INT(O+.5)-,5+X/24-2415020)/36525:60SUR270: G0SURS3: RETURN 

37 Y=-SIN(GL)#SIN(AH):X=COSCAH):GOSUB9:PRINT'FAziaut au Lever =";:gosuhétreturn 
40 C$="O": TFU<OTHENC$="05" 

41 IFABS(U)<,.CITHENC#="OU< à" 

42 PRINTTAE(27)C$:RETURN 


10 TARN n°2 IF 





43 XF IEC/UX 180: JEAX:GOSURI: JB (1-TCOS(J))/0#180:C=A+VX-F-E:Y=COS(D)#SIN(C) 
44 PRINT"ERayon Vecteur ="int(j#iegt,5)/leg"ua":y=cos(c)tgosuh9tu=zte-ls 
45 XESIN(C)#SIN(D) 3 GOSURT 1: 1=X: Y=JECOSX)#SINCH):X=JxCOS(X)#COS(H)4RS 

46 GOSURYIK=Z+LS SAZSORCYEY+XEX#( JESIN(T)) A2): X=J/A#SINCT) :G0SUB 11 

47 PRINT"Bistance & la Terre ="int(atie4)/ie4"ua": jfuéOthengosuhÿS return 
48 D=J:PRINT"#": jfuci83.33thenprint"000":GOSUR94 

49 I=KtJEX PRINT" BDisnetre Equetoriel ="int(20#u/s+.5)/10"E"? 

30 IFHH?UTHENFRINT"'ADiametre Polaire ="int(20#hh/a+t.5)/10"R7" 

Si HH=0:60SURE3:TFU=83, 33THENRE TURN 

32 Hf=-,.0106-.0004#50R (62) : PRINT :GOSUR22: 601090 
Y=SIN(T)#COS(OB)-TANCI)#SINCOR):X=COS C1) :GOSUBY:X=Z:RK=X:GOSUB7:X=X/15 
ALEXSIFN=OTHENPRINT "Sâscension Droite ="s:gosubi7:gosuhiiprint 
X=SINJ)#COS COR) + COS) ESTINCOB)ESINCT):GOSUB Ii :DA=X:DLEX:X= Um 
IFN=ÜTHENPRINT"SDeclinaison ="; :gosubl7:x0=x0#sgn(du) :gosub18:gosun25 
RETURN 

PRINT: FRIAT'DERIT-DIAMETRE ="INT(X)"G "7": 

X={NTECX-TNT IX) )#400)/10:PRINTX"E" "RETURN 

2 CLR:O23.14599265:FRINT "7": POKES 9468, 14: INPUT" Bânnee de input"Bhois "ra 
INPUT" SJours "ydi input "Heures "sh: input "8Minutes "iots=100tprint"Paris ? 
GETC#: IFCR=""THENSS 

66 IFCH="O"THENGI=-.1544:62=30:61=48,503:G0T071 

67 IFCSC"N"THENES 

66 INPUT"ELongitude "iglixcehs (gi): goeuh?{sol=xxcgn(g)/15 

69 INPUT"ELatitude "yxtifahs(x)?/7Üthenrun 

0 Gi=X: INPUT BAltItude (mn) rxrg2zsho(x) 

71 X=G1:G0SU21:G12X/180#0: IFAGATHENT=T-1 :M=M+#12 

72 REINTCT/EO0) :R=2-A+TATCA/4) :H7=F/éti+H7 

73 O=TAT(365.25#T)+INT(30.6001#(M+i))+0+1720994,5+H7/24 

74 IFf+(D/5+h)/6%1582, 10ISTHENO=0+E 

75 1=(0-2419020)/36525:P=TAT:M=.274919+100.002146#T+1E-6#P:X=M:GOSUBI 

77 MEXs24:1 624. 48164428, 33227: M5<6.266+628, 301941 

79 I. Oi68:AX=NSI=AX:GOSUBI SL EL S+UX-NS:0B=.4093-3E-4XT 

Bi R8=1-I#CO5(J):LS=L-1E-4-8E-5461N(4,5235-33,7571#1}:601090 

45 TFESOANDABS(X) SITHENRETURN 

6 H=33u47,5-Xx, 73: IFPÉERCNISSTHENFOREN, JIRETURN 

47 (FPEEKN-4U)2STHENPOKEN-40, RETURN 

88 FOKEN+AU, J:RETURA 

s0 H=U: PRINT"EBNO. MiGETC#:X=VALICS) 11FC$="S"THENI 90 

91 IFC#="L'THEN265 

92 JFX=OTHEN9O 

93 PRINT" I": :ONXG0TO729, 780, 1060, iii0, 1i70,1220,i280,2220, 42 

94 PRINT"RASgni tude Visuelle ="intivxlD421. Ji47#log(atj)+.5)/10treturn 

F5 WEXiXE JE J+AXA-REA2)/2/J/À:GOSUR96: GOSUBI4:X=X/0+ RO: RETURK 

96 1=,5+K/2:PRINT"SFraction illuminee ="int(iést.5)/5ireturn 

97 IFABSCX)%THENRUN 

98 RETURN 

190 PRINT"I"TAR(I4)"S O LE Ï Ru print'Jour Julien ="u 

195 FRINT'STps Sid a Ed tu) ="ssxcascelraosutaQiprintsx2"s 

5 PRINT" 8Keuon Vecteur ="inttrsties)/jes"uz 

220 I=L5: JEU: GOGURS AG ALEPRIAT:X=949.63/R5/460:60SUB40 

244 Hf=-,.(i0é-,.0047-.0004#60R (62) :60S1R22:60T020 

265 PRINT" 3"TAB(I4)"L U N EBE 

2 O Lh=4,72+6399,7092%T:U=6,2566+628.3019T 

U E=5.168+6329,4911#T42E-4xP:C=8,1215+7771.37738T 

Ü F=,1964+6433, 4443%T-6E-GxPiD27E-HESIN(É. D4R6+2,319x7-2F-43P) 

D LA=4.5236-33,7%71#T:A=SIN(LA) 

380 LAZLA#D:E=E+4E-5#4+D:C<C+D 
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370 F=F-4E-4354-8E-GESINLA+4,8008-,0401#7)+0:62:.0175-4E-54T 

390 I=LA+, IO98#GIN(E)+.0222#6INC2*C-E)+.D11SXSIN(2xC)+3,7E-3XSIN(24E) 

400 I=I-3,2E-3#6IN(U)#6-2E-F#6INC2XF)H1E-FAGIN(2XC-2#E)-6E-4#SIN(C) 

40 IEI+IE-ZASIN(2RC-U-E)#G49E-4XSINCZHC+E )+BE-4#GTN(2#C-U) #6 

430 I=T+7E-42SIN(E-U)#6-5E-4#SIN(E HN) #6: J=,.0895*SIN(F)+4.9E-3XSIN(E) 

450 J=J+4,8E-G#GINCE-F)43E-GXSINC2XC-F)+ÎE-3XSIN(Z#C+F-E) 

460 JEJXBE-4#6INC2#C-F-E)+6E-4#SIN(2RC+F)+3E-4XGIN(2XE+F) 

480 J=UH2E-4RSINCAXCEE-FIH2E-4HGTNO2EE-F)HÂE-4#SIN(2#C-U-F) #6: IFN?OTHENRETURN 

540 K=,01659+9E-44C0S(E)+1.7E-4RC0S(2XC-E)+1.4E-4#C06(2XC)4GE-5#C06(2#E) 

J60 KEK-GE-44COS(C)+2E-HRCOGCZ#C+E)+VE-4KCOS(2#C-U)#G+47E-6HCOS(2#C-U-E) #6 

J/0 K=K+6E-BECOS(E-U)#G-5E-6# COS (UE) #6 

630 X=K:GOSUR7:FRIHT'FARALLAXE ="5;:GOSURI7:GOSURIB:PRINTINT(X2)"E"* 

680 GOSUBS3:PRINT:C= INT(4378, 14/SENCK): PRINT'SDistance Terre-Lune ="c'kn 

690 C=5974713.33/CiX=C:GOSUR6Q:X=COSCI-L)#COS(J) :GOSURI 4 

00 A=G-X-2,56E-3#(1-. 05495 IN(E))/(1-,0167#SINCU))#SIN(X) :X=COS (A) :GOSUB96 

Ji N=i:Hñ=.(i66-.0i06-.0047-.0006*S0R(62) : GOSUR34 

712 GOSUBSOR=XIX=(AL+K6+63-N) *HIGOSUBRIU:KEX {= (AL+GI-N)#H:GOSURIO:ES=X 

Ji4 VETIXERSGOSURZ 6: GOSURT4: RE AH: PRINT "Heure du Lever ="; 

715 N=O:GOSUBSO:PRINTIN=1:X=E 8: GOSURZ4: PRINT" EPassage au Meridien ="3:n=0 

716 X=CAL4G3-M)XH:GOSURAU: PRINT: NE: X=K: GOSURI 6: N=0: AH=R: GOSUR24: T=U: 607090 

729 PRINTTAR(LS)"A E RC U R E":A=3.1098+2608.8147#T:B=.0046756:C=.00359 

760 D=,1222:E=,8220+.(20741:F=1,785i+2608.7074#T 123,34: G0SUR43 

TH VEl. lt. 0244#(X-S0)+41E-4x(X-50) A2: X=H:GO0TO4E 

780 PRIRTTAR(IH)"V E N Li G'i425,9824#1021,3529xT:8=,012425 

1030 C=1,2E-41F=3,7106#1021,3284#T:E=1,3226+.0157#T 1028.41 

JOSU D=,0592:GOSUR43:V=-4+, Gi 2#X+4,2E-7#X 83: YEN: 607048 

160 PRINTTAB(16)"A À KR S":425.1247+374.08%6*T:B=.028593:C=.00143 

090 U=4,681D=,03229:E=.46iût 0e TiFes. 57674234, 053527 :60SUR43 

Li0Ù V=-1,34,0149#X:X=4: 607048 

iii V=-8,93:FRINITAB(DUIUFITER 

1120 À=4.1547+52,9935*T:8=.090902:D=.02 
+ 


28-1E-4#T:C=9,44E-4:HH=91.91 
fioû Ezi,7356+.U176%T:0=98.47:F23,9327+52,9854xT:G0T043 
[170 HH=74,57:V2-8, 54: PRINTTAR(IH)"S ATURNE 


lieu fr4,4524+21.343xT:C=9.74E-4-6E-64T:D=.0434-7E-54T 

1200 Ez1.54898+.D152#T:U283,33:F=3,062%+21.3201#T:B=.164762:G0SUR43: J=D 

jaûi Uef.45t2+,.0076#7:V=-SIN (DL )#SINC()-COS(DL)4COS CU) +COS(,6346+.0738xT-RK) 
1202 V=-8,45e1,25#VRV-AB6 (2.440) PRINT "BB": gosub94: ur int" SSSSBBBE" ;gotos2 
1220 VE-6,8H:FRINTTARCI4)"U R 4 NU SB":2=4,24247,5025*t5h=,33542 

1240 C=9,096-4:0=.019%:E=1,2024+,0047#1:F=1.260+7.4766#T:U=34,28:G60T043 

1250 FRINTIABOIGD"H E FT UN FBiez2,2008+.(192xt:f=.6580+3,R129#tiu=36,56 
1270 A=1,474143,8377#T:Vz-7,05:82,526511:C21,.67E-4:D=.031-2E-4%T: dre 

2220 FRINTTAB(9)"SATELLITES DE JUFITERS':d=0-2415020: iz6,256586+.017202* 

225 PRINT'Belongations exprinees en rayons ee ee * 
240 J=3,868474,0i5702#0142, DISSI#SIN(I)+4,49E-4XSIN(2#T) 

260 R=.094639*SINCY)+,002915#5INt2#Y) :K=J+A-B:E=50R(28.07-10,406#C05(K)) 

2260 XESINIKI/EGOSURISSUED-E/173:D=X-BiY21,475686+3, 550102#0+D 
7Ù 
280 
qù 
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C=INT(390,8#SIN(Y))/5:A=C0S(Y) 
Y=,724330+41,767870#U+D:F=1INT(939.7#SIN(Y))/S 
B=COG(Y):Y=1,919461+.876754x1+D:I=INT(1498,9#SIN(Y))/S:K=C05(Y) 

z300 Y=3.078038+,375036%1+D:Z2INT(2636.4#SIN(Y))/S:Y=COS(Y):U=A 

05 PRINT'OBEIo ...,,,,,. :* “c:gosuh40sprint"#Europe ..... : "fiu-b:gosuh4l 

310 FRIRT'Ebanygnede ... : "ituskigosubéÜiprint"BCsllisto ... : "z:u=y:gosub4l 

15 FRINT"880fNlestOQUEST 

20 FRINTTAB(18)"B(DR)BRR":x2c: j=Qie=a: gosuhB 

30 X=FSJEStE=B:GOSUBAS:X=I : J=7:E=K:GOSURAS:X=2: J=3:E=Y:GOSUR85S:60T09D 
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Voici un programme qui va vous donner en 
fonction de la date et du lieu, les positions 
des astres les plus intéressants. En somme, un 
programme pour aider les astronomes amateurs à 


‘pointer leur télescope. 


Nous avons donné d'abord 
voici la notice d'utilisation. 


le listing; 


Pour commencer voici son fonctionnement : 


La machine vous pose une série de ques- 
tions afin de situer les recherches dans le 
temps et dans l'espace : 


La question "Année" ne présente pas 
d'ambiqguité : il suffit de répondre normalement. 
- Exemples : 1981, 2001, -2422, 


Pour les années négatives, prendre garde 
au fait que l'année 0 est en fait l'an 1 avant 
J-C. La raison en est simple : les historiens et 
les scientifiques ne comptent pas les années de 
la même manière; en effet une machine prendra en 
compte l'année 0 alors que cette année 0 n'aura 
aucun sens d'un point de vue historique : l'ère 
chrétienne débutant le premier janvier de l'an 1 
à O heure, et l'année précédente étant l'an 1 
avant J-C. Donc ne pas oublier de faire la cor- 
rection si vous avez à rentrer une année négati- 
ve. 


La question "Mois" ne pose pas 
blème non plus, rentrez simplement le 
mois désiré. 

- Exemples : juin = 6, novembre = 11, ... 


de pro- 
numéro du 


A la question "Jour", il faut répondre 
par le quantième du mois, (1 à 31), et non par 
le jour de la semaine. 


À la question "Heure", il faut donner à 
la machine le temps universel et non pas l'heure 
légale. 11 faut donc enlever une heure ou deux 
heures par rapport à l'heure légale française 
pour obtenir le temps universel, et réciproque- 
ment, tous les résultats relatifs des phénomènes 
de levers, couchers et de passages au méridien 
seront exprimés en temps universel. Il faudra 
donc effectuer l'opération inverse pour en dé- 
duire l'heure légale. 


Enfin à la question "Minutes", répondre 
tout simplement le nombre de minutes. 


La machine sait maintenant pour quel mo- 
ment précis elle doit faire ses calculs. Il va 
sans dire que toutes les réponses à ces ques- 
tions doivent être suivies par "RETURN", pour 
pouvoir être enregistrées. 


Puis la machine affiche "Paris ?"., Si 
les calculs doivent etre faits pour Paris, ré- 
pondre "0", et dans le cas contraire, évidemment 
répondre MN". La machine ignorera toute autre 
forme de réponse. 


Si vous répondez à cette question par la 
négative, apparait "Longitude". Il est alors né- 
cessaire de fournir à la machine une longitude 
exprimée en degrés, minutes (2 chiffres), et se- 
condes (2 chiffres). 

- Exemple : Paris est à -9mn 20s, 921 de longi- 
tude, ( "-" car à l'est du méridien de Green- 
wich). 


Es étant : 
1 degré = 4 minutes d'heure 
* 1 minute d'angle = 4 secondes d'heure 
* 1 seconde d'angle = 0.07 secondes d'heure 


On obtient alors : 
longitude de Paris = -2 20! 14!!. 


Donnée qu'on rentrerait dans la machine par : 
-2.2014. 


Ensuite est demandée la "Latitude" du 
lieu, (toujours en degrés, minutes d'angle (2 
chiffres), et secondes d'angle (2 chiffres). La 
latitude doit être rentrée avec un signe "-" si 


c'est "sud", le signe "+" étant facultatif si la 
latitude est "nord". 
- Exemple : Paris se trouve à (+)18 50! 24! 


(latitude de l'observatoire de Paris). 


Enfin l''Altitude", demandée en mètres 
au dessus du niveau de la mer. Exemple : Paris = 
environ (+)30 mètres. 


Quelle que soit l'option choisie à la 
question "Paris ?", la machine procède à cer- 
tains calculs pendant quelques secondes; calculs 
qui lui resserviront par la suite pour à peu 
près tout qu'on sera amené à lui demander. Après 
quelques instants elle affiche en haut et à gau- 
che de l'écran un "no." en vidéo inversée. Par 
cela, l'ordinateur signifie qu'il est prêt à 
effectuer les différentes opérations qui figu- 
rent à son actif (et ce dans l'ordre que vous 
désirez). 


À la demande : 
frent à vous : 


1) : Vous avez fait une erreur lors de la 
rentrée de vos paramètres, (faites attention, 
car une fois que vous aurez fait démarrer les 
calculs, vous ne pourrez plus vérifier ces para- 
mètres). Voulez donc les changer; appuyez sur la 
touche "9" et recommencez depuis le début. 


“no.", 11 options s'of- 


2) : Ephémérides du SOLEIL = "S" 
3) : Ephémérides de la LUNE = "L" 
4) : Ephémérides de MERCURE = "1" 
5) : Ephémérides de VENUS = "2" 
6) : Ephémérides de MARS 181 
7) : Ephémérides de JUPITER = "4" 
8) : Ephémérides de SATURNE = "5" 
9) : Ephémérides d' URANUS = "6" 
10) : Ephémérides de NEPTUNE = "7" 
11) : Satellites de JUPITER = "8" 


Reprenons maintenant une par une les di- 
verses rubriques de ce programme : 


2) SOLEIL : appuyez sur la touche "S". Une 
série de résultats apparait sous vos yeux. 


a) Jour Julien : il est commode de numéroter 
les jours en séquence à partir d'une certaine 
origine qui se situe le 1er janvier de l'an 4713 


avant J-C à 12 heures (soit l'année -4712 algé- 
brique). C'est ce qu'on appelle la période Ju- 
lienne. 


Le jour Julien,1insi défini, ne commence pas 
à O heure, mais à midi. 

Vous vous demandez certainement à quoi peut 
bien servir ce calendrier Julien ! Sachez seu- 
lement que les dates juliennes sont très com- 
modes à utiliser en astronomie, et que prati- 
quement tous les calculs en dépendent. 


Ce 7 22 2 


b) Temps sidéral de Greenwich a O0 heure T.U. 
(Temps Universel) : cette grandeur représente un 
angle défini à 24 heures près et qui est donc 
ramené entre 0 h et 24h. 


c) Rayon Vecteur : le rayon vecteur représen- 
te la distance Soleil-Planète, (en l'occurence 
la Terre), distance exprimée en Unités Astrono- 
miques (u.a.). 


L'unité astronomique est égale à 149 597 870 
kms (U.A.1., 1976). 


d) Ascension droite et déclinaison représen- 
tent les coordonnées équatoriales célestes de 
l'astre : 


L'ascension droite, (appelée alpha), est 
l'angle dièdre du plan contenant l'astre et les 
deux pôles célestes (cercle horaire de l'astre), 
et de celui d'un point donné de l'équateur appe- 
lé point vernal ou équinoxe de printemps (cor- 
respondant au point d'intersection de l'éclipti- 
que ou plan de l'orbite terrestre et de l'équa- 
teur céleste, lorsque la déclinaison du Soleil 
s'annule en croissant). 


La déclinaison, (appelée delta), est l'angle 
que la direction de l'astre fait avec le plan de 
l'équateur céleste. Elle est mesurée en degrès 
de -90 à +90. L'angle polaire est le complément 
à 90 de la déclinaison. 


Les coordonnées équatoriales sont très utili- 
sées en astronomie car elles ne dépendent pas de 
la position de l'observatoire sur le globe ter- 
restre. De plus, à partir d'un certaine taille, 
les instruments d'observation disposent d'une 
certaine monture équatoriale qui permet de 
compenser la rotation de la terre en n'agissant 
que sur l'ascension droite. 


e) Azimut et Hauteur représentent les coor- 
données horizontales de l'astre. Elles sont 
déduites des coordonnées équatoriales. Contrai- 
rement à ces dernières, les coordonnées équato- 
riales dépendent de la position de l'observateur 
sur le globe terrestre, et de ce fait sont beau- 
coup plus parlantes. 


L'azimut astronomique, (appelé A), est en gé- 
néral compté à partir du sud; mais pour facili- 
ter l'emploi d'une boussole où d'un compas, le 
programme donne l'azimut correspondant compté à 
partir du nord, (ne pas oublier de tenir compte 
de la déclinaison magnétique qui varie suivant 
les endroits : 3 en Alsace, 8 en Bretagne). 


La hauteur, (appelée H), est l'angle de la 
direction de l'astre et du plan de l'horizon. 
Elle est comptée entre -90 et +90. La distance 
zénithale vaut 90-h. Si une hauteur est négati- 
ve, il est évident que l'astre est sous l'hori- 
zon et de ce fait n'est pas visible. 


f) Le Demi-Diamètre est le demi-diamètre ap- 
parent de l'asire. Il est compté en minutes et 
secondes d'arc. 


g) Les heures de lever, Coucher, et de Pas- 
sage au Méridien du lieu, (plan passant par les 
deux pôles et le lieu de l'observateur), sont 
données en Temps Universel comme il a été signa- 
lé plus avant. 


h) L'Azimut au Lever correspond à l'angle de 


l'astre avec le nord au moment de l'affleurement 
de son bord supérieur, (et non de son centre), 
sur l'horizon, (tenir compte de la hauteur de 
l'observateur, de la réfraction, des obstacles 
éventuels : collines, ...). 


L'azimut au coucher est le complément à 360 
de l'azimut au lever : 
- Exemple : azimut au lever = 71 37' donnera : 
azimut au coucher = 360 - 71 37' = 288 23'. 
Ceci pour les calculs relatifs au Soleil. On 
retrouvera plus loin une partie des grandeurs 
que nous avons définies ici. 
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Passons à la Lune; pour ce faire, pres- 
sons la touche "L". Un assez long moment se pas- 
se alors, (pour la Lune, l'ensemble des calculs 
va être effectué en a peu près 15 secondes), 
longueur, (relative d'ailleurs), étant due à la 
complexité des opérations mises en oeuvre. 


3) LUNE : 


a) La Parallaxe est l'angle sous lequel on 
verrait le rayon de la Terre du centre de la 
Lune. 


b) Alpha, Delta, À, et H ont déjà été défi- 
nies plus haut. On les retrouvera d'ailleurs 
pour les sept planètes. 


c) La Distance Terre-Lune en kms est calculée 
centre à centre. Ne pas trop tenir compte des 
deux derniers chiffres. 


d) Le Demi-Diamètre a été également défini 
précédemment . 


e) La Fraction illuminée varie entre 0 et 1; 
0 désignant une nouvelle Lune, 1 désignant une 
pleine Lune. Si la Fraction illuminée vaut en- 
viron 0.5, c'est qu'à l'instant demandé la Lune 
sera, (est, ou a été), à son premier quartier ou 
à son dernier quartier. À propos, comment diffé- 
rencier ces deux phases ? Nous allons voir pour 
cela une règle mnémonique très simple : il suf- 
fit, (quand la Lune est éclairée à moitié), de 
prolonger l'axe rectiligne central, et de voir à 
quelle lettre minuscule cela correspond : 


p (remier) ou d (ernier). 
Simple, n'est-ce-pas ! 


f) Pour les heures des phénomènes, prenez vo- 
tre mal en patience; la Lune est un astre qui 
dispose d'un mouvement très complexe, en raison 
des multiples perturbations, (essentiellement 
dues au Soleil), qui influencent son mouvement 
autour de la Terre. De ce fait, les calculs pour 
arriver à une bonne précision sont un peu fas- 
tidieux. 


Une série de remarques à propos des ré- 
suitats que fournit la machine sur la Lune. En 
raison de la grande complexité de la théorie lu- 
naire, et du peu de place mémoire disponible sur 
les machines que nous employons, une part rela- 
tivement peu importante de termes périodiques a 
été employée (la théorie de BROWN, actuellement 
la plus précise, en donne plusieurs milliers 
...). La conséquence en est que je ne prétends 
pas donner, pour les résultats relatifs à la 
Lune, une précision surabondante. 
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Les tests que j'ai effectués, m'ont don- 
né un ordre de grandeur de l'erreur inhérente au 
calcul; la plus grande erreur observée sur la 
position est de l'ordre de 10' de degré en in- 
clinaison, de quelques minutes dans les heures 
de lever et coucher. Notons cependant que la 
plupart des amateurs n'ont pas besoin de plus de 
précision. 


En revanche, la parallaxe, le demi-dia- 
mètre, la fraction illuminée, et l'heure de pas- 
sage au méridien sont donnés avec beaucoup plus 
de précision. Je rappelle que cette remarque 
n'est valable que pour la Lune, en effet pour le 
Soleil et les planètes, la précision qu'on peut 
attendre est bien plus grande, (de l'ordre de 1' 
à Z2' de degré en déclinaison et de 1 minute 
d'heure en ascension droite. Quant aux satelli- 
tes de Jupiter, vous n'aurez aucune raison de 
vous plaindre des résultats fournis. 


Un autre programme est actuellement en 
préparation, ne traitant, celui-là, que de la 
Lune et du Soleil. Ce programme donnera la po- 
sition de la Lune et du Soleil avec une très 
grande précision (de l'ordre de la seconde d'an- 
gle), comportera des calculs des éclipses de 
Lunes et de Soleil (avec circonstances locales), 
et pourra, si j'en ai la place, prévoir les oc- 
cultations d'étoiles de première grandeur et de 
planètes par la Lune. 
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Passons maintenant aux planètes. Une 
chose pour commencer : elles sont placées dans 
l'ordre numérique équivalent à leur ordre de 
distances croissantes au Soleil. 


4) MERCURE : 


Quelques renseignements d'ordre nouveau 
nous sont donnés ici : Distance à la Terre, 
Magnitude Visuelle, et diamètre équatorial. 


a) Il me semble inutile de préciser ce que 
représente la distance à la Terre. Par contre, 
je désirerais attirer l'attention du lecteur sur 
le fait qu'il va pouvoir entreprendre lui-même 
des calculs très intéressants : en effet nous 
avons eu le rayon vecteur de la Terre parmi les 
renseignements relatifs au soleil. Nous dispo- 
sons maintenant du rayon vecteur de Mercure, (ou 
d'ailleurs de toutr autre planète), et de sa dis- 
tance à la Terre. Si nous représentons les trois 
corps : Planète-Soleil-Terre, dans un plan; dis- 
posant de trois longueurs du triangle ainsi for- 
mé, nous sommes à même d'en déduire les angles, 
et donc la configuration ! 


b) La Magnitude visuelle permet de classer 
les astres en fonction de leur éclat apparent, 
selon une échelle logarithmique telle qu'une 
différence d'une unité de magnitude se traduit 
par un rapport d'intensité lumineuse de 2.5. Par 
exemple, un corps de magnitude 4 est 2.5 fois 
moins brillant qu'un corps de magnitude 3, mais 
2.5 fois plus brillant qu'un corps de magnitude 
5. Une différence de 5 magnitude: correspond à un 
rapport d'intensité de 100. 


A titre de remarque, notons que la limite 
d'observation de l'oeil humain dans des condi- 
tions parfaites, (aucune turbulence atmosphéri- 
que, ciel parfaitement pur), correspond à la 


magnitude 6. 


Prenons des références : le Soleil est de 
magnitude -27, la pleine Lune -13. A leur 
maximum de brillance, les différentes planètes 
du système Solaire ont pour magnitudes respec- 
tives : 


Vénus = -4.8 Mars = 3.2 
Jupiter = -3 Mercure = -1.2 
Saturne = - .8 Uranus = +5 
Neptune = +7.2 


Pluton ne fiqure pas dans le programme, et 
pour cause : sa magnitude est toujours supérieu- 
re à 1det n'est du reste accessible qu'à des 
instruments très puissants. Pour mémoire, Si- 
rius, l'étoile la plus brillante du ciel est de 
magnitude -1.9 et l'Etoile Polaire est un astre 
de magnitude +2. 


c) Le diamètre équatorial représente comme 
précédemment le diamètre apparent de l'astre, 
mais mesuré à l'équateur. Nous verrons apparai- 
tre, pour Jupiter et Saturne, le diamètre polai- 
re. En effet pour ces deux planètes, la diffé- 
rence entre diamètre équatorial et polaire n'est 
pas négligeable. La raison en est très simple : 
contrairement à des planètes solides, Jupiter et 
Saturne sont des planètes gazeuses, de grand ra- 
yon et de vitesse de rotation autour d'elle-même 
très rapide; (respectivement à l'équateur 9h 50 
mn et 10h 4mn), l'élargissement équatorial du à 
la force centrifuge est donc assez important. 


5), 6) VENUS, MARS : 


Pour Vénus et Mars, les résultats que fournit 
la machine sont similaires à ceux de Mercure, la 
fraction illuminée n'apparait plus, elles sont 
en effet trop loin de la Terre pour que l'effet 
de phase soit important. 


d) Le Demi-Diamètre a également été défini 
précédemment . 


7), 8) JUPITER, SATURNE : 


Jupiter est sans histoire. Saturne aussi si 
ce n'est, vous l'avez remarqué, que sa magnitude 
ne s'affiche pas directement. En effet, il ne la 
donne qu'après avoir calculé la position de Sa- 
turne. La raison, là aussi, est très simple : 
Saturne possède un système d'anneaux, et ces 
anneaux sont suffisamment importants pour faire 
varier La luminosité de l'ensemble Saturne-An- 
neaux, suivant qu'on les voit à leur maximum 
d'ouverture ou bien par la tranche. Je ne ren- 
trerai pas dans les détails des circonstances de 
passage de la lerre dans le plan des anneaux, 
mais il faut savoir que la position de Saturne 
est nécessaire pour calculer les divers éléments 
de ces anneaux, et donc leur éclairement en sus 
de celui de la planète même. 


9), 10) URANUS, NEPTUNE : 


Uranus et Neptune ne nécessitent aucun 
éclaircissement supplémentaire. Vous avez déjà 
tous les éléments afin d'utiliser au mieux les 
renseignements fournis pour ces deux panètes 
lointaines. 
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Enfin, voyons les quatre satellites qga- 
liléens de Jupiter. Ils portent ce nom pour 
avoir été découverts par Galilée au moyen d'une 
lunette très peu performante qu'il s'était cons- 
truite lui-même. Ces quatre satellites sont les 
plus gros des quatorze que possède Jupiter. 


Les satellites sont traités par ordre de dis- 
tances croissantes à Jupiter. Le rayon de Jupi- 
ter étant pris comme unité, les élongations sont 
ainsi exprimées avec un signe négatif si le sa- 
tellite est à l'est de Jupiter, et sans signe si 
le satellite est à l'ouest. 


Les élongations maximales sont respectivement 


10 = +/-5.91 Europe = +/-9.40 
Ganymède = +/14.99 Callisto = +/26.37 


La petite flèche donne suivant son orien- 
tation le sens du déplacement apparent : 
) signifie vers l'est 
( signifie vers l'ouest 
( ) signifie en bout d'élongation orientale 
ou occidentale 


Prenons le cas du 29 juin 1980 à 2h 30 mn T.U., 
on trouve : 

lo ; .37 ) 

Europe - : 7.95 ( 

Ganymède : -14.99 ( ) 

Call iSto, 22:75 ) 

ouest est 
c JA) g 


On s'aperçoit sur le graphique que io n'ap- 
parait pas. En effet, il est en train de passer 
derrière Jupiter (son élongation étant comprise 
entre -1 et +1), et se dirige vers l'est. Europe 
se dirige doucement vers l'ouest et se rapproche 
de son maximum d'élongation. Ganymède est à son 
maximum d'élongation orientale. Quant à Callis- 
to; il vient de passer à sa plus grande élonga- 
tion occidentale. 


NOTA : Attention, si vous regardez dans une 
lunette ou un télescope non muni d'un redres- 
seur, l'image paraitra inversée. 
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Pour terminer cette notice, faisons un 
récapitulatif de toutes les opérations que peut 
effectuer le programme. 


Pour ce faire, et puisqu'il faut bien 
lui donner une date et un lieu, j'ai choisi de 
le lancer sur la date suivante : 


Le 25 juin 1980, à 20 heures et 46 minutes. 
Voilà ce que nous voyons sur l'écran : 


Année ? 1980 
Mois ? 6 
Jours ? 25 
Heures ? 20 
Minutes ? 46 
Paris ? 


Prenons maintenant dans l'ordre tous les 
résultats que fournit le programme, à partir de 
cet écran initial. 


SOLEIL 


Jour Julien = 2444416.37 

Tps Sid à Gre (0h tu) = 18 h 16 m 345 
Rayon Vecteur = 1.01662 ua 

Ascension Droite = 6h 19m 
Déclinaison = 23 22! 

Azimut = 318 22' * Hauteur =-8 59" 
Demi-Uiamètre = 15! 43.9!! 

Heure du Lever = 3h 49m 

Passage au méridien = 11h 55m 

Heure du Coucher = 20h 0m 

Azimut au Lever = 50 40! 


LUNE 
Parallaxe = O0 55! 50! 
Ascension Droite = 16h 12m 
Déclinaison =-16 13! 
Azimut = 165 10! * Hauteur = 23 44! 
Distance Terre-Lune = 392762 km 
Demi-Diamètre = 15! 12.7'! 
Fraction illuminée = .93 
Heure du Lever = 16h 54 m 
Passage au méridien = 21 h 48 m 
Heure du coucher = 1 h 52m 
Azimut au Lever = 114 11! 


MERCURE 


Rayon Vecteur = .464 ua 
Distance à la Terre = .6544 ua 
Fraction illuminée = .18 
Magnitude visuelle = 1.5 
Diamètre Equatorial = 10.2! 

Ascension Droite = 7 h 46 m 
Déclinaison = 19 44! 

Azimut = 299 29! %* Hauteur = 1 2! 
Heure du Lever = 5h 40 m 

Passage au méridien = 13h 21m 
Heure du coucher = 21h 3m 

Azimut au Lever = 57 28 


VENUS 


Rayon Vecteur = .7276 ua 

Distance à la Terre = .3064 ua 
Fraction illuminée = .04 

“agnitude visuelle =-3.6 

Diamètre Equatorial = 54.9! 

Ascension Droite = 5h 10m 
Déclinaison = 19 35! 

Azimut = 331 39! * Hauteur =-17 5! 
Heure du Lever = 3h 6m 
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Passage au méridien = 10 h 47 m 
Heure du coucher = 18 h 27 m 
Azimut au Lever = 57 42! 


MARS 


Rayon Vecteur = 1.5965 ua 
Distance à la Terre = 1.4691 ua 
Fraction illuminée 
Magnitude visuelle ë 
Diamètre Equatorial = 6.4'! 

Ascension Droite = 11 h 31 m 
Déclinaison = 3 46! 

Azimut = 245 32' %* Hauteur = 24 37! 
Heure du Lever = 10 h 45m 

Passage au méridien = 17 h 6m 

Heure du coucher = 23 h 27 m 

Azimut au Lever = 82 38! 
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JUPITER 


Rayon Vecteur = 5.4186 ua 
Distance à la Terre = 5.8426 ua 
Magnitude visuelle =-1.4 
Diamètre Equatorial = 33.7! 
Diamètre Polaire = 31.5! 
Ascension Droite = 10 h 29m 
Déclinaison = 10 38! 

Azimut = 263 6! * Hauteur = 20 6! 
Heure du Lever = 9 h 11 m 
Passage au méridien = 16h 4m 
Heure du coucher = 22h 58 m 
Azimut au. Lever = 72 5! 


SATURNE 
Rayon Vecteur = 9.4786 ua 


Distance à la Terre = 9.6523 ua 
Magnitude visuelle = 1.2 


Diamètre Equatorial = 17.3! 
Diamètre Polaire = 15.5! 
1h 32m 


Déclinaison = 5 21 

Azimut = 246 22! Hauteur = 26 2! 
Heure du Lever = 10h 39m 

Passage au méridien = 17 h 7 m 

Heure du coucher = 23h 36m 

Azimut au Lever = 80 13! 


URANUS 


1 
Ascension Droite = 1 
' 
* 


Rayon Vecteur = 18.7689 ua 
Distance à la Terre = 17.9977 ua 
Magnitude visuelle = 5.8 
Diamètre Equatorial = 3.8'! 
Ascension Droite = 15h 21 m 
Déclinaison =-18 11! 

Azimut = 178 29! * Hauteur = 22 57! 
Heure du Lever = 16h 19m 
Passage au méridien = 20 h 56 m 
Heure du coucher = 1 h 32m 
Azimut au Lever = 116 40! 


NEPTUNE 


Rayon Vecteur = 30.336 ua 
Distance à la Terre = 29.3488 ua 
Magnitude visuelle = 7.7 
Diamètre Equatorial = 2.5! 
Ascension Droite = 17 h 18m 
Déclinaison =-21 41! 

Azimut = 150 37! %* Hauteur = 14 19! 
Heure du Lever = 18 h 36 m 
Passage au méridien = 22 h 52m 
Heure du coucher = 3h 9m 
Azimut au Lever = 122 28! 
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SATELLITES DE JUPITER 


élongations exprimées en rayons joviens 
JO RE TALS AE) 
Europe ..... 1529539 ( ) 
Ganymède ... : 14.26 ) 
CAES TOR 207 ( 
ouest est 
C g e (SR 
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Ce programme permet d'effectuer des vé- 
rifications amusantes sur des textes littéraires 
qui citent des circonstances astronomiques. 


On décèle dans certains cas une erreur 
comme par exemple dans les "Contes du Lundi" 
d'Alphonse Daudet : 


En effet, l'auteur, dans les “Contes du 
Lundi", fait observer à Bélisaire un lever de 
Lune dans la nuit du 29 janvier 1871. Or, le 29 
janvier 1871, la Lune était à son premier quar- 
tier, et, au premier quartier, la Lune se lève 
toujours vers midi. 


En l'occurence, ce jour-là, elle se le- 
vait vers 11h 20 mn TU. Eile ne pouvait donc pas 
se lever dans la nuit. 


Dans d'autres cas, la description est 
parfaitement exacte. Voici un exemple tiré des 
“mémoires d'Outre-Tombe"” de Chateaubriand. 

Cet ouvrage se termine dans un style très 
émouvant, jugez plutôt : 


" En traçant ces derniers mots, ce 16 novem- 
bre 1841, ma fenêtre qui donne à l'ouest sur les 
jardins des Missions étrangères, est ouverte : 
il est six heures du matin; j'aperçois la lune 
pâle et élargie; elle s'abaisse sur la flèche 
des invalides à peine relevée par le premier ra- 
yon doré de l'Orient : on dirait que l'ancien 
monde finit et que le nouveau commence. Je vois 
les reflets d'une aurore dont je ne verrai pas 
se lever le soleil. [l ne me reste qu'à m'as- 
seoir au bord de ma fosse, après quoi, je des- 
cendrai hardiment, le Crucifix à la main, dans 
l'Eternité." 


Quelle occasion de choix pour un astrono- 
me... En effet, peut-on rêver description plus 
précise; tout y est : la date, l'heure, le lieu, 
la position de la lune, sa configuration ou plu- 
tot sa phase. Quand Dumas ou Stendhal, pour ne 
citer qu'eux, parlent de la Lune, on est loin de 
trouver une description aussi détailléé. 


Il vient immédiatement à l'esprit que Cha- 
teaubriand n'a pas pu inventer cette descrip- 
tion. D'autant que l'atmosphère au moment où il 
écrivait ce passage ne devait pas porter à l'eu- 
phorie. 


Et pourtant, chose surprenante au possible, 
quand on vérifie avec le programme ce qu'il dé- 
crit, rien ne correspond entre ce qu'il indique 
et ce qu'ii y avait réellement dans le ciel à ce 
moment-là. 


La Lune élargie ne l'est pas du tout puis- 
que sa fraction illuminée ne vaut que 0.09, soit 
1/11 ème du disque lunaire. 





Mais s'il n'y avait que cela... La position 
de la Lune ne correspond pas non plus : 


“ma fenêtre qui donne à L'OUEST ... : il est 
SIX HEURES DU MATIN ... ELLE S'ABAISSE sur la 
flèche des Invalides ... par le PREMIER RAYON DE 
L'ORIENT." 


Nous ne sommes pas loin de la nouvelle Lu- 
ne. Par conséquent, la Lune se trouve du même 
coté que le Soleil, sa face visible n'étant pas 
éclairée. Or le Soleil se levant à l'est, il ap- 
paraît que la Lune ne pouvait se trouver à l'ou- 
est à six heures du matin. 


Alors que s'est-il passé, qui ait pu provo- 
quer une erreur aussi grossière chez Chateau- 
briand, d'habitude si fidèle dans ses descrip- 
tions ? 


Cette description, M. André Danjon, membre 
de l'institut et ancien directeur de l'observa- 
toire de Paris se l'est posée également. Et 
n'arrivant pas à admettre une erreur de La part 
de l'auteur, il a décidé de compulser le manus- 
crit des "Mémoires d'Outre-Tombe". Il à dû pour 
cela le chercher dans une collection privée. 


C'est dire que le problème lui tenait à 
coeur, et il a trouvé la solution de l'énigme. 


En fait Chateaubriand ne s'est pas trompé 
dans sa description; mais le copiste, pour sa 
part-a fait une erreur de lecture. Chateaubriand 
a écrit : 


“En traçant ces derniers mots, ce Îr novembre 
LL 


et le copiste a compris : 


“En traçant ces derniers mots, ce 16 novembre 
LL 


Là, pas d'erreur possible; et si on refait 
le calcul pour cette date, tout correspond à la 
description de Chateaubriand; la hauteur de la 
Lune au dessus de l'horizon (ce doit étre celle 
de la flèche des Invalides vue de sa chambre); 
son azimut, (bien à l'ouest); enfin sa fraction 
illuminée, (0.95 correspond bien à une lune 
élargie). 


Bel exemple de la contribution que l'as- 
tronomie et l'informatique peuvent apporter au 
rétablissement de la vérité. 


Olivier BARTHELEMY 
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1 L { 


ner T1 . _—< cb 

compteur H 

En L | + 

temporisateur Ti . re B 

latch H 
EE = + Ù + 

terporisateur T2 à ; 

SR  — 









59408 


59409 


59410 
59411 


59424 
59425 


59426 


59427 





RÉRÉSSÉRRRERERRRÉRÉRRERRRERRERERRE 


* # 
Le S'ABONNER GRATUITEMENT ? : 
L à 


LRÉRRREERÉERERSERÉERERRÉRRRRERERELERÉEÉ 


Comment vous abonner gratuitement pour votre 2 ème 
année ? C'est très simple ! Il suffit de nous renvoyer 
cette feuille complètement remplie accompagnée du régle- 
ment, avec votre nom et les noms de 5 de vos amis: vos 
amis recevront leur abonnement pour cette année, et, pour 
vous, votre abonnement sera automatiquement renouvelé 
l'année prochaine. 


= Je désire renouveler mon abonnement à La Com- 
mode, en parrainant les cinq amis dont les noms suivent. 


NOM ----- 


adresse ------"""""" 


= Je désire m'abonner à La Commode (1 an, 4 
numéros = 120 F) 


NOM "nn 


adresse ------"""———— 


= Je désire m'abonner à La Commode (1 an, 4 
numéros = 120 F) 


NOM -------" 


adresse -----""""""""-mmm mm 


Æ Chu 2 








3 PARRAINE 


——-----— Je désire m'abonner à La Commode (1 an, 4 
numéros = 120 F) 
ROM. -------- 
adreSS@ ---------- """""" """ 
date --------___ signature ----------_- 
4 PARRAINE 
= Je désire m'abonner à La Commode (lan, 4 
numéros = 120 F) 
nom TS == mm mms emmmmmmcsse ms _—-- 
AUTOS SE === 
date --------___- Signature ----------_- 
5 PARRAINE 
= Je désire m'abonner à La Commode (T1 an.=4 
numéros = 120 F) 
ROM ESS EE die 
adresse ---------- "TT 
date ---------__ Signature ---------__- 
ci-joint réglement 5x120 F = 600 F 
par CCP CB 


N.B. Les cinq abonnements parrainés peuvent etre 
servis à un même établissement d'enseignement. Joindre un 
bon de commande de l'établissement, et déduire du régle- 
ment une remise supplémentaire EDUCATION de 50 F d'où une 
somme de 550 F. 


A envoyer à La Commode 
28, rue Vicq d'Azir 
75010 PARIS 


Ce CENTS. 


IMP. LABALLERY et C* - 58500 CLAMECY 


GC 





La Commode vous offre cette double page détachable que vous pourrez 
avoir toujours à proximité de votre ordinateur. Une face BASIC, une face langage 


machine. 


Les pointeurs BASIC 












DRE DLLIRIE 


; 7E-7F 2c-2D 2C-2D 2F-30 
126-127 | 44-45 44-45 47-48 
80-81 2E-2F 2E-2F 31-32 
128-129 | 46-47 46-47 














H| 7A-7B 28-29 28-29 début du texte BASIC 
D| 122-123, 40-41 40-41 

H| 7C-7D 2A-2B 2A-2B fin BASIC début var. 
D | 124-125] 42-43 42-43 45-46 


fin var. début tab. 


fin des tableaux 






82-83 30-31 30-31 
à 130-131 48-49 48-49 51-52 libre 
H | 84-85 32-33 32-33 35-36 début des chaînes 
D | 132-133 | 50-51 50-51 53-54 
86-87 34-35 34-35 37-38 fin des chaînes 
134-135 | 52-53 52-53 55-56 fin de la MEV 





(en général égaux) 


Chaque pointeur est organisé: adresse basse puis adresse haute. 


Organisation du texte BASIC 


“er en 


a  — 


Ce 


Don début des variables 


Organisation des variables en BASIC 








réel 





entier 


chaîne 


5 .-. Chaque variable occupe 7 octets 


2 premiers octets: 
code ASCII des 2 premiers caractères du nom 
5 octets valeur CMMMM 


2 premiers octets: 
ler caractère du nom + 128 
: 2è caractère + 128 
2 octets suivants: valeur haut bas 
3 octets inutilisés 


2 premiers octets: 
2 premiers caractères du nom (le 2è + 128) 
L=longueur de la chaîne 
puis pointeur vers la chaîne elle-même 
2 octets inutilisés. 


a CR 





Schema des modes d'adressage 


COP = code opération : 


PA = partie adresse 


AE = adresse effective : () = contenu de 















Inhérent [cop ] 
- Accumulateur |COP | 
Immédiat [cop [Pa ] 
Absolu 
Page zéro page zéro 
OOPA 
Indexé PA I 
index 
Ÿ 
se subdivise en 4 modes 
- absolu indexé par X 
- absolu indexé par Ÿ 
- page zéro indexé par X 
- page zéro indexé par Ÿ 
Indirect 
Indirect,X O0PA 
(x) 
Ÿ 
HE 
Indirect, Ÿ 
Relatif 





adresse implicite 


opérande = accumulateur 


opérande = PA elle-même 
AE = PAH PAB 

opérande = (PA) 

AE = OOP 


AE = PA + (index) 


PA = adresse de l'adresse 
AE = (PA) 
((PA)) 


opérande = 
(n'existe que pour JMP) 


age zéro 


AE = (PA + (X)) 


(PC) + DEP 
ad. cop + 2 + DEP 


us mme unes mms mms nm ont eme mms mms mme mm sm em mm és mew pot mm mm ms ous oo eus ns ms os mn en es ne one nt ms ee ne nn + mm me one me me ue ns es ms ms + ms em mm mm md 


